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Avec son « kit-programmation Turbo Pascal »,Fraciel vous donne la possibilité 
d'utiliser pleinement toutes les ressources de votre AMSTRAD, 
à la manière d’un véritable ordinateur professionnel. 


TURBO PASCAL TURBO TUTOR 


PLUS VITE, PLUS FACILE, Turbo Tutor c’est un ensemble formation pour 
LE LANGAGE QUI VOUS PERMET apprendre et maîtriser « sans peine » le Pascal 
D’UTILISER À FOND et toutes les ressources de Turbo Pascal. Turbo 
Tutor s'adresse aussi bien aux débutants qu'aux 

VOTRE ORDINATEUR programmeurs confirmés auxquels il explique 

. nu les notions les plus « pointues ». 
+ Vitesse de compilation Turbo Tutor ne coûte que 400 F. 
Turbo Pascal compile en mémoire et en une seule Il comprend 1 manuel en français (200 pages) et 
passe, à la vitesse d'environ 100 lignes/seconde. 1 disquette reprenant tous les exemples du livre. 
+ Editeur-compilateur intégrés ACIEL ë 
L'ensemble éditeur-compilateur réside en FR ÿ 


mémoire. Lorsque votre programme est entré, 
vous le compilez en tapant simplement 
sur une touche. BON A 


Si une erreur survient à la compilation, 
l'éditeur est appelé et l'erreur retrouvée dans 
le code source. 


e Un langage toutes applications 
Toutes vos applications peuvent être écrites | 


P 


(A turbo TS 40 € (VA) 
400 F jé . je vous 
J \ TV A) remboursé s\ s 
po Pasca 25F{ je serai { sous le 
Lie EUT + 1e né renvo ie ouver ja diS 
ns 
où _ 


pur 
nest SEMENT 


avec Turbo Pascal : gestign, enseignement, 
calculs, logiciels systèmes, jeux, graphisme, 
recherche, etc.. 


Pour vos commandes. 
renseignements et 
documentation gratuite : 
ou pour contacter notre 
assistance téléphonique : 
47.64.08.52. 


S 
FRACIEL 


La Société AMSTRAD France ayant décidé une baisse sur les disquettes, nous la 
répercutons sur les prochaines livraisons. 


ous les programmes parus 
dans CPC sur une disquette 
ou sur une cassette pour ne pas 


perdre de temps à les saisir. | BON DE COMMANDE 


L'idée n'est-elle pas bonne ? Sur : n E 

la même disquette (ou cassette) -_ (valable jusqu’à épuisement des stocks) 
seront regroupés les programmes 

parus dans deux numéros suc- Abonné  Non-abonné 
cessifs de CPC. 

Le tarif, port compris, 110 F pour 

la disquette ou 85 F pour la cas- 

sette pour les abonnées. JOIN- 

DRE IMPERATIVEMENT VOTRE 

ETIQUETTE D’ABONNE AU CHE- 

QUE DE COMMANDE. 

Pour les non-abonnés, le prix est 

de 140 F (D) ou 110 F (C), tou- Adresse 

jours port compris. 

Passez vos commandes directe- Code Postal 

ment aux Editions SORACOM. 

Pas de contre-remboursement. Entourez le numéro du disque choisi ou de la revue. 

Les programmes sont livrés tels Frais de port : 6,50 F pour un ou deux numéros de CPC. 


ue publiés dans la revue et n'ont 
bi duel modification. À vous Franco pour CPC DISC et CASSETTES. 


de les adapter à vos besoins si Ci-joint, chèque bancaire ou postal de F. 
vous le désirez. 


S'ABONNER, C'EST : 


— recevoir la revue tranquillement à domicile, 

— bénéficier de prix avantageux par souscription comme nous venons de le faire 
par mailing en octobre (gain : 45 francs !), 

— bénéficier de prix sur les disquettes et maintenant les cassettes, 

— recevoir l'auto-collant CPC, 

— bénéficier de notre aide dans de nombreux domaines. 


Alors, n'hésitez pas. Abonnez-vous. 


CPC, La Revue des Utilisateurs d'Amstrad 


ABONNEMENT POUR UN AN — 11 NUMÉROS : 175 F 
6 MOIS : 99 F — D'ESSAI 3 MOIS : 50 F 
Tarif avion : + 120 F 


Ci-joint un chèque (libellé à l'ordre des Editions SORACOM) 
d'un montant de francs. 


Prénom 


PAS D'ABONNEMENT RETROACTIF — DEBUT ABONNEMENT=NUMERO SUIVANT LA RECEPTION DU BULLETIN 


Ci-joint un chèque libellé à l'ordre de : Éditions SORACOM. ; 
Retournez le(s) bulletin(s) ou une photocopie à : 
Éditions SORACOM — Service Abonnements — Le Grand Fe — 10, Avenue du Général de Gaulle — 35170 BRUZ. 
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lat “FEUILLE TON DE L'ETE” 


Disponible pour : AMSTRAD (tous) 
ORIC-1 et ATMOS 
CASSETTE : TO 7/70 et MO5* 
COMMODORE 64% 
140 F SPECTRUM* 
Disquette AMSTRAD 199 frs 
M * sortie le 15 noveubre 1985 


DOSSIER "G." - Auteur Daniel Lefebvre. 


Le sabotage de "RAINBOW WARRIOR" par une équipe de nageurs de combat 
appartenant aux services secrets français a été au coeur de l'actualité 
de l'été 85 en raison du rôle joué par la presse dans la mise en lumière 
de cette affaire. 


Me | 


Qu. | : 


Chacun possède son opinion sur "L'affaire Greenpeace" ... les hypothèses 
de responsabilité les plus diverses ont été émises dans la presse ou à 
la télévision. La radio même s'est jointe au choeur des “révélations 
fracassantes". 


Qu'en est-il aujourd" hui de l'opinion de chacun de nous ? Qu'en est-il 
de votre opinion ? Disons même, de votre solution à cette première . 
énigme politico-militaro-médiatique ? 


La réalité, une fois de plus, dépasse la fiction. Mais pour la première 
fois, le jeu d'aventure se trouve DANS l'actualité. Les indices abondent, 
saurez-vous reconstituer ce puzzle historique ? 


"DOSSIER G." est l'outil informatique de cette expérience inédite, le 
remède radical à cette passivité de consommateur de média que nous sommes 
tous. Ne subissez plus l'actualité, parcourez la comme une base de données 
avec humour et logique. Confrontez enfin votre opinion, éclairée de ses 
contradictions, à celles de 1" opinion publique. Prévoir les réponses de 
cette dernière est une possibilité supplémentaire de "DOSSIER G.". Là 

| n'est pas le moindre de ses charmes. 

\ 


Veuillez me faire parvenir “DOSSIER G" pour 
marque de l'ordinateur : . . FRS 
cassette - disquette (rayer la mention inutile) 


u 


à l'adresse suivante : 


Dans Le nouveau catalogue COBRA SOFT plus de 
50 nouveautés ! 100 Logiciels couvrant toutes 
Les applications de La micro-infonmatique 
familiale. 


Mess ssssossssosssssossessssssmessssssssecsee 


essence 


Pour recevoir Le catalogue, renvoyez-nous 
Le bon ci-contre en rayant La demande de 
programme et en précisant "catalogue". 
Joignez 2 timbres à 2.20 fns. En cas d'achat 
de "DOSSIER G" vous recevrez Le catalogue 
automatiquement. 


Code postal ....... Ville .............sssss.se 


Ci-joint mon réglement par chèque (rajouter 10 frs 
pour le port), soit FRS 


À envoyer à COBRA SOFT BP 155 Chalon s/S Cedex 


Editorial 2.12 sSsecssesistesresses 7 Utilitaires de recopie d'écran ....... 38 


Amstrad Computer Show .......... ÿg PMEIPML: séries 45 


Banc d'essai des logiciels .......... 12 Banc d'essai CAISSE-DETAIL ........ 46 


La vitrine du libraire .......... .... 14 | Le boin bidouille ................. 
Voler sur CPC ...................18 | Utilitaire en Pascal ............... 
CHERRY-PAINT .................. NE RE TE TT il 


Morpions 2eme 


Moulimot ............... ........ 30 | Initiation à l'assembleur ........... 
KiloDYte: sas sommaires 


Jeu de la vie .................... 36 | Petites annonces ................. 


A AOGOELLE Micronaute 


m 2i LE SPECIALISTE 
AMSTRAD à NANTES 
Micro-Informatique Individuelle 464.664 


6128 :- 8256 


CPC 464-664-6128 ériphéri 
périphériques 
PCW 8256 + de 100 logiciels 


Matériel, logiciels joux - utilitaires disquettes, cassettes 
accessoires, périphériques, librairie semi-pro ou particuliers 


LENS 
MICRO JM 
INFORMATIQUE 


Revendeur qualifié 
conseil AMSTRAD 
Point pilote 
nouveautés, softs 
et périphériques 
A partir du 1°" septembre 
96, Av. Alfred Maës 
62300 LENS 


21, Albert 1er 
17060 LA ROCHELLE 9, rue Urvoy de St. Bedan 


Tél.: 46.41.80.58. 44000 NANTES 
Tél.: 40.69.03.58 


Tél.: (21) 28.72.44 


20, rue de Montreuil 94300 VINCENNES -— Tél. : (1) 43.28.22.06 
OUVERT DU MARDI AU VENDREDI de 10 h 30 à 13 h et de 15 h à 19 h, LE SAMEDI de 10 h 30 à 19h 


REVENDEUR OFFICIEL AMSTRAD FRANCE 
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F , à : Cinertace MID}... ut. 1490 F 
[] votez pour moi ....... © gestion domestique À rocky horror show .... 125 F : 
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CPC 664 [] business +... Cinitiation basic CO gems of stradus + 
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D combat Iynx De bagne de nepharia.. 140 F  Cdaley decathlon .….... 110 F \ 
O compilateur intégral .. 250 F Cle millionnaire... 140F  CJstar avenger 
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D cours de solfège du kikekankio 160F  Cjet set willy .. 
niveau 1 Ole survivant .......... 120F  Csuper chess… 
D cours de solfège Ole trésor de l'Amazone  99F  Cj manic miner : 
niveau 2 ORAN 100 F ï ee Joystick TIRVITT 
{ O] pyjamarama + er" ET 
© cub-bert O MA. base ........... 165F  Crocky horror show... 125F Le “MUST” en matière de joystick! 8 directions, 
ODAO............... CO] macadam bumper ... 160F  Cjsorcery 135F contact par micro-contact, robuste, élégant, précis, 
O dr. Watson (autoform. [] manager ............ O strip poker... 140F il ne vous décevra pas, garanti 1 an, compatible 
0 ler lecteur de disquettes. .............. assembleur) [ master chess......... © world cup football... 120F standard ATARI et MSX 
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ü no gi Le [ rod see O amsword (français) ..… 245 F 
Synthétiseur vocal AMSTRAD D fighter plat … CI multicopy. D american autel. 98 À 
Enfin votre AMSTRAD peut s'exprimer! Anglais d'ori-  Cflight path 737 C night booster… C] easy file (français)... 175 F 
gine il gardera son accent mais, grâce à un programme S Les manager . D Othello … C] easy calc (français) .. 175 F Mannesmann MT 805 
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LETTRE A UN VOLEUR... 


Me voici dans tes mains. Je te sens me tenir avec fébri- 


lité. C’est long un mois, penses-tu. Alors, je te plais avec 
mon numéro 5 ? Tu vois, dans ce numéro, il y a de nou- 
veaux programmes. 

A propos de programmes, sais-tu que, pour ton plaisir, 
de nombreux amateurs et professionnels travaillent des 
semaines, voire des mois pour te livrer leurs travaux ? 
Sais-tu que le logiciel que tu achètes est protégé par des 
droits et des lois et que de faire une copie pour la vendre 
est un vol ? 
Un vol ? 
Non, plusieurs vols ! 


Un vol vis-à-vis du revendeur. Un vol vis-à-vis du fabri- 
cant qui investit pour te mettre ce produit dans les mains. 
Mais aussi un vol moral, tout aussi grave, vis-à-vis des 
auteurs et de leur œuvre. 

Aussi, mes parents (tu sais, le rédacteur en chef et le 
directeur) avaient un choix à faire. Soit contrôler mes peti- 
tes annonces et les censurer, soit les laisser passer afin 
de faire prendre le pirate en flagrant délit de vol. 

Pour l'instant, mes parents ne m'ont pas dit ce qu'ils pen- 
sent. En fait, le mieux, c’est de cesser le piratage. 
Lis-mol bien, et si tu as le temps, écris-mois ! 


A NOS LECTEURS 


Quelques lecteurs viennent de ( 
nous faire part de leurs problèmes 

avec certains revendeurs, parti- 
culièrement les grandes surfaces. 
Pour gagner du temps et aussi 
pour pouvoir agir avec efficacité, 
merci de joindre la photocopie de 
la facture. 
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coupon à Joindre 
à toute 
correspondance 


LE CATAMSTRAD 
C’EST QUOI! 


D logiciels utilitaires 
D logiciels de jeux 
D logiciels éducatifs 
D accessoires 

D interfaces 

D imprimantes 

D livres 
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Vente Informations Services Micro-Ordinateurs 
Micro-ordiénateunrs damiliaus 
84, bé Besumarchais - 78011 Paris 


Métro Bastille ou Chemin Vert 


? 


est dans les salons de l’h6- 

tel Novotel de Londres, 
situé à Hammersmith, soit à une 
dizaine de kilomètres à l’ouest 
du centre-ville, que s’est tenu 
durant le week-end du 5 au 6 
octobre, le premier Amstrad 
Computer Show. Organisé par 
Database Publications, éditeur de 
notre confrère Computing with 
the AMSTRAD, ce salon regrou- 
pait toutes les compagnies britan- 
niques qui, de près ou de loin, 
commercialisent des produits 
destinés aux utilisateurs d’ordina- 
teurs AMSTRAD. La rédaction de 
CPC avait effectué le voyage 
pour vous relater l'événement, et 
c'est, guidés par l'organisateur 
M. Derek MEAKIN lui-même, que 
nous avons eu le privilège de visi- 
ter les quelque 80 stands de l’ex- 
position. 


A tout seigneur tout honneur ! 
Nous avons demandé à voir en 
tout premier lieu le stand du 
constructeur. Malheureusement, 
si ses ordinateurs étaient omni- 
présents, celui-ci brillait par son 
absence et tout au plus, un repré- 
sentant du staff d’Alan SUGAR 
semblait s'’ennuyer sur le stand 
du magazine de la marque : Ams- 
trad Computer User. Bref, l’évé- 
nement semblait peu propice à 
l'annonce de nouveautés chez 
AMSTRAD |! Nous avons quand 
même posé la question de savoir 
si l’on pouvait espérer dans un 
proche avenir la sortie d’un nou- 
veau modèle (16 bits, portable ? 
— il est permis de rêver !). Il nous 
a été répondu par un laconique : 
‘’Pas de nouvelle machine cette 
semaine... ‘’ Comme quoi, on 


peut avoir l'air de s’ennuyer et 
conserver un flegme et un 
humour typiquement britannique. 
La grande nouveauté, c’est chez 
NORTHERN COMPUTERS qu'il 
fallait aller la découvrir : un réseau 
local avec disque dur de 10 
méga-octets pour AMSTRAD 
que nous décrirons dans le pro- 
chain numéro. 

L'autre nouveauté dont tout le 
monde parlait, était la souris 
AMX (rien à voir avec les chars 
d'assaut) de ADVANCED 
MEMORY SYSTEMS. De nom- 
breux visiteurs profitaient du prix 
expo de 69,99 livres pour repar- 
tir avec la bête sous le bras. Il 
était d’ailleurs quasiment impos- 
sible d'approcher le stand, et 
nous avons dû attendre le diman- 
che matin, avant l'ouverture de 
l'exposition au public, pour assis- 
ter à une démonstration en toute 
tranquilité et faire quelques pho- 
tos. La souris, dotée de 3 pous- 
soirs, se connecte à la prise joys- 


Marcel LE JEUNE 


tick et est livrée avec un logiciel 
de dessin à icones et menus 
déroulants ainsi qu’un manuel 
permettant de l'utiliser dans ses 
propres programmes. 

Chez THE ELECTRIC STUDIO, la 
vedette était ESP, un light-pen 
extrèmement précis et sensible, 
vendu 19,96 livres avec un logi- 
ciel de dessin très performant. 
Tout ÿ est : zoom, effets de 
miroirs, dessin en 3D, etc. Ega- 
lement chez le même éditeur, 
AMSPRITE qui, comme son nom 
l'indique, permet de générer et de 
gérer jusqu’à 40 lutins sur 
l'écran. 

Pour en finir avec les logiciels gra- 
phiques, il ne fallait pas manquer 
chez EG COMPUTER GRAPHICS 
le fabuleux logiciel de dessin 
industriel Draughtsman, idéal 
pour le dessin mécanique et élec- 
tronique. 


Nous aurons l’occasion de vous 
présenter tous ces produits plus 
en détail dans un prochain banc 
d'essai. 

Du côté des utilitaires, la vedette 
était PRIDE UTILITIES qui ajoute 
à sa gamme désormais célèbre 


par Syclone, Tomcat, un nou-. 


veau programme sur disquette : 
ODDJOB. On y trouve pêle-mêle 
un copieur, un utilitaire permet- 
tant de cacher des noms de 
fichiers dans un catalogue, un 
autre permettant de réparer un 
secteur endommagé et bien d’au- 
tres programmes astucieux qui 
deviendront rapidement un must 
pour tout utilisateur d'AMSTRAD 
avec lecteur de disque. 

Comme nous l’avons vu, le hard 
n'était pas délaissé, et DK'TRO- 
NICS présentait une gamme de 
modules enfichables. Un bloc de 
64 k ram, accompagné d'un 
logiciel ajoutant 12 commandes 
au Basic, est destiné aux utilisa- 
teurs de 464 et 664. IIs peuvent 
ainsi obtenir la même capacité de 
mémoire que le 6128. Le Silicon 
Disc est un disque virtuel de 
256 k qui se connecte indiffé- 
remment à n'importe quel modèle 
AMSTRAD, pourvu qu'il soit doté 
d'une unité de disques. Il procure 
un gain de temps énorme en évi- 
tant les fréquents accès au dis- 
que en cours de travail et peut 
s'utiliser à partir du Basic ou sous 
CP/M. Neil RAWLINSON, direc- 
teur de DK'TRONICS, nous a 
déclaré avoir entamé des négo- 
ciations avec Denis TAIEB, ex- 
importateur de la gamme ORIC, 
pour la distribution en France de 
ces modules. 


AC ITOMIES 256K MEMORY 
AITONRICS SILICON DISC 


AUITONIES 64K MEMORY 
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La Cure 

NI NME 

Les logiciels professionnels 
deviennent de plus en plus nom- 
breux sur AMSTRAD, prouvant 
l'intérêt suscité par ces machines 
auprès des petites entreprises. 
Database Software propose pour 
9,95 livres son logiciel Mini 
Office qui combine un traitement 
de texte, un gestionnaire de 
fichiers, un tableur et un utilitaire 
graphique. Evidemment, ce n'est 
pas Framework, mais cherchez 
mieux pour ce prix | D'ailleurs, 
plus de 25 000 exemplaires du 
programme ont déjà été vendus. 


De son côté, GEMINI SERIOUS 
SOFTWARE présentait Database 
accompagné de Report Genera- 
tor qui formatte les données de 
vos fichiers à votre convenance 
sur l'imprimante. Egalement chez 
le même éditeur, Home Accounts 
qui est un programme de gestion 
de budget familial sur cassette ou 
sur disque. Tous ces programme 
doivent être prochainement tra- 
duits en français. 

Bien évidemment, tous les jeux 
d'action étaient présents et de 
nombreux stands ressemblaient 
aux salles d’arcade de Las Vegas. 
Que de monde, que de bruit, et 
pourtant rien de transcendant. 
ALLIGATA avait même encastré 
ses AMSTRAD dans des meubles 
du plus bel effet, calqués sur les 
machines à sous des cafés et, 
comme il n’y avait pas de mon- 
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nayeurs, vous imaginez la bous- 
culade… 

AMSOFT présentait 3D Grand 
Prix, course de voitures en 3D, 
analogue au célèbre Pole Position 
d'Atari et chez MYRDDIN SOFT- 
WARE, on pouvait voir à côté de 
leur simulateur de vol, le pro- 
totype de Zania, jeu d'aventure 
entièrement et uniquement gra- 
phique de 250 kilo-octets ; 
superbe ! Le problème de la lan- 
gue est ainsi résolu, et Myrddin 
espère commercialiser rapide- 
ment ce programme dans toute 
l'Europe. 

Tous les éditeurs britanniques 
sont d’ailleurs conscients de l’ex- 
tension des ventes d'ordinateurs 
AMSTRAD sur le continent et se 
déclarent prêts à traduire leurs 
logiciels et notices et recherchent 
activement des distributeurs à 
l'étranger. 

Le show ouvrait ses portes au 
public à partir de 9 heures le 
dimanche matin et déjà à 8 h 30, 
les visiteurs se pressaient sur le 
parvis de l'hôtel, laissant présa- 
ger une affluence encore plus 
importante que la veille. Mais il 
nous fallait déjà rentrer en 
France... Il nous reste à saluer 
l'heureuse initiative de l’organisa- 
teur de cette exposition et à lui 
souhaiter un aussi franc succès 
pour sa deuxième édition. 
Rendez-vous en 1986, Monsieur 
Derek MEAKIN 1! 
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‘LE SURVIVANT"" 

PSS - ERE Informatique 
Support cassette 

Tous AMSTRAD. 


‘Le Survivant’’ est le premier fruit de l’as- 
sociation franco-anglaise entre ERE et PSS 
qui consiste à traduire et à distribuer les meil- 
leurs softs de la marque étrangère (ERE 
commercialisera ainsi toute la gamme des 
‘’Wargames”’'). 

Ce logiciel est un cocktail bien dosé entre 
stratégie et action (à peu près 60 % d’arcade 
et 40 % de réflexion), et présente un thème 
original. V'ous êtes le dernier survivant d’une 
race hélas aujourd’hui éteinte, et vous devez 
absolument retrouver les 64 parties du code 
génétique qui permettra de ressusciter votre 
peuple. Vous disposez d’un petit vaisseau en 
forme de bulle, assez difficile à manier du fait 
d'une inertie importante. Vous avez aussi la 
possibilité de sortir de votre bulle pour récu- 
pérer les différents objets qui vous seront uti- 
les dans votre quête. 

Chaque zone de jeu comporte 4 pièces avec 
une méchante bestiole dans chaque. On y 
trouve aussi une clé, un coffre contenant un 
morceau du code génétique, un revitaliseur 
qui vous remettra sur pieds, et surtout une 
plante étrange, qui vous permettra de proje- 
ter (en diagonale uniquement : il faut jouer 
avec les rebonds !) des bouffées de gaz 
paralysant. Une fois les créatures immobili- 
sées, il faudra rapidement remonter dans la 
bulle et venir ‘’cueillir’’ le monstre. Une fois 


S'ils sont quelque part 
c'est chez 


Microfolies 


AMSTRAD 6128 
AMSTRAD 8256 


et les derniers logiciels. 


4, rue André Chénier 
78000 VERSAILLES 
Tél.: 30.21.75.01. 
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CPC 464/664 -SPECTRUM 


ÉRE RAOBMATICA 


les bestioles éliminées, vous pourez alors 
ouvrir le coffre, récupérer le code et changer 
de zone (comme il y a 64 morceaux du code 
et 4.salles par zone, cela fait. eh oui, 256 
pièces à visiter 1). Le fait de toucher une créa- 
ture vivante ou d'être touché(e) par vos pro- 
pres tirs, vous fait perdre de l'énergie. Vous 
pouvez à tout instant ‘’geler’’ le jeu et faire 
apparaître un tableau récapitulant votre état, 
les objets et les monstres transportés, le 
temps depuis le début du jeu et les morceaux 
du code récupérés. 

Le Survivant est un jeu difficile, dont l’inté- 
rêt et l'originalité sont encore accrus de par 
l'utilisation de deux ‘’personnages’’ diffé- 
rents : le Survivant seul et le Survivant dans 
son vaisseau-bulle, qui sont difficiles à bien 
diriger. Le graphisme général est soigné, et 
l'animation des monstres et du personnage 
est très bien faite. La sonorisation du jeu 
aurait pu, par contre, être un peu améliorée. 
Les décors sont variés (ils changent à cha- 
que zone). 

On peut jouer au ‘’Survivant’’ avec le joystick 
ou au clavier, dont les touches sont d’ailleurs 
redéfinissables (enfin un programme qui 
prend en compte l'ergonomie !). De plus, la 
cassette comporte une version AMSTRAD et 
une version SPECTRUM. 

Une certaine habitude est nécessaire pour 
jouer au ‘’Survivant’’ (les premières parties 
ne durent que quelques secondes !), mais ce 
jeu ne déparera pas votre ludothèque. On 


espère que les prochaines ‘‘traductions’’. 


d’ERE seront aussi bonnes. 
Graphisme=4, Son=2, Animation=4, 
Intérêt = 3, Originalité= 4. 


DES LOGICIELS 


‘’LES MILLE-BORNES"" 
FREE GAME BLOT 
Jeu de table 

Support cassette 
Tous AMSTRAD 


Tout le monde a certainement en mémoire ce 
jeu célèbre, qui se vend toujours à 100 000 
exemplaires. Le but est de réaliser 5000 
points par manches successives au cours 
desquelles on doit atteindre exactement 
700 kilomètres. Jeu de cartes où se mèlent 
hasard et stratégie, le Mille-Bornes proposé 
sur AMSTRAD vous opposera à l'ordinateur. 
Expliquer la règle du jeu en quelques ligne 
n’est pas chose aisée : il existe des cartes 
‘‘étapes’’ (distance parcourue), des cartes 
‘’attaques”’ (permettant de ralentir, voire blo- 
quer l'adversaire), des cartes ‘’parades'’ 
(pour parer aux attaques) et des cartes ‘‘’bot- 
tes’’ (pour immuniser le joueur qui les pos- 
sède pendant toute une manche). 

Le rendu des cartes à l’écran est tout à fait 
correct, et le jeu reste utilisable que le moni- 
teur soit couleur ou monochrome. 

Le joueur ne gagnera pas à tous les coups car 
l'ordinateur saura user de stratégie et porter 
‘’bottes’” et ‘coups fourrés’ à bon escient. . 
Pour tous ceux qui aiment les jeux ‘’de 
société”’ qui en ont assez de traquer l’enva- 
hisseur, le MILLE BORNES offrira d’agréables 
moments de détente. Par son originalité et 
sa qualité de réalisation, ce jeu se distingue 
un peu de ce qui existe sur AMSTRAD. 


Graphisme : 3, Son : 2, Animation : 2, Inté- 
rêt : 4, Originalité : 4. 


‘‘PLANETE BASE’ 

LORICIELS 

Educatif 

Support cassette 

Tous CPC, moniteur couleur nécessaire 


Il y a encore assez peu de logiciels destinés 
aux enfants, ayant un but éducatif, et qui ne 
soient pas rébarbatifs. Celui-ci, après quel- 
ques tests sur des élèves de CE1 à CM1, 
nous a paru digne d'être cité. || permet à 
l'élève de se familiariser, en s'amuasnt, avec 
la notion de bases et de numération. 

Le héros du jeu s’appelle PEPO. Il doit nour- 
rir son ami NUMERUS, sorte de Casimir (pour 
les connaisseurs), au moyen de pommes rou- 
ges. Pour obtenir ces pommes rouges, PEPO 
doit cueillir, et échanger chez le marchand, 
des pommes bleues, jaunes et blanches car 
les rouges ne poussent pas sur les arbres de 
sa planète. 

C'est au moment de la cueillette, et surtout 
de l'échange, que va intervenir la notion de 
base. 

Coloré et d’une présentation agréable (PEPO, 
le petit garçon, est animé comme un person- 
nage de dessin. animé), ce logiciel permet- 
tra aux parents d'illustrer les leçons corres- 
pondantes. A la maison ou à l’école, si celle-ci 
n'est pas envahie de TO7 ou semblables, 
PLANETE BASE trouvera une place aux côtés 
de l'ordinateur. 


Graphisme : 4, Son : 3, Animation : 3, Inté- 
rêt : 4, Originalité : 3. 
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LOGICIEL ÉDUCATIF - LOGICIEL ÉDUCATIF - LOGICIEL ÉDUCATIF - 


FONCTIONS" 

MICRO-C 

Utilitaire/Didacticiel 

100 FF cassette, 130 FF disquette 
Tous CPC 


Ecrit par un professeur de mathématiques, 
FONCTIONS est un des rares logiciels sus- 
ceptibles d'être utilisés à l’école et à la mai- 
son. Il se compose de deux parties : les cour- 
bes de fonction et les intégrales. Utilisable 
de la seconde à la terminale, il permettra 
l'étude graphique des fonctions les plus 
complexes, mettant au grand jour les notions 
de continuité ou de dérivabilité. 

Pour les intégrales, la méthode retenue est 
la ‘’méthode des rectangles’’. Dans le logi- 
ciel est inclus un rappel de cette méthode. 


Le calcul de la-valeur des intégrales et leur 
représentation graphique sont prévus. 

La réalisation est très correcte avec une uti- 
lisation sobre des couleurs et du son. La ligne 
contenant la fonction à étudier est éditée 
automatiquement, permettant à l'utilisateur 
sa modification aisée. 

D'un prix très raisonnable, le logiciel sera d’un 
grand secours aux étudiants désireux de 
comprendre, par l'image, la théorie apprise 
en cours. 


Graphisme : 3, Son : 2, Animation : 1, Inté- 
rêt : 3, Originalité : 3. 


‘‘ORPHEE (VOYAGE AUX ENFERS)"'' 
LORICIELS 

Aventure 

Support disquette 

Pour tous les CPC 


Vous connaissez LORICIELS, chez eux, on ne 
fait pas les choses à moitié... ORPHEE est 
une grande fresque, occupant plus d’une face 
de la disquette (l’autre partie de l’autre face 
étant réservée à une démonstration), vous 
invitant à un voyage aux enfers. Rien de bien 
engageant, penserez-vous. Le thème est 
spécial, en effet, puisque vous descendez en 
enfer, suite à un accident de voiture, pour 
décider si votre corps vivra ou non. On aime- 
rait pouvoir être réellement maître de ce genre 
de décision | 

Le texte est illustré par des images très soi- 
gnées, d'où l'humour n’est pas toujours 
absent. Les effets sonores qui viennent ponc- 
tuer le jeu sont assez réussis. Votre AMS- 
TRAD prononcera, à l’occasion, quelques 
mots que vous n’aurez aucun mal à recon- 
naître malgré le petit diamètre du haut-parleur 
interne. Ajoutez à cela des illustrations musi- 
cales et vous aurez une idée de ce tableau 
que nous avons tenté de ‘‘’brosser’’ en quel- 
ques lignes. Pour le reste, nous vous laissons 
découvrir : nul doute que les passionnés de 
jeu d'aventure n’y trouvent quelques heures 
de plaisir | 


Graphisme : 4, Son : 4, Animation : 2, Inté- 
rêt : 3, Originalité : 3. 


‘*SUPERSONIC'’ 

LOGI'STICK 

Utilitaire 

99 FF sur cassette, 139 FF sur disquette 
Pour 464 et 664 


Avec SUPERSONIC, ça va faire du bruit. 
Des ‘‘’bangs’’, des ‘’psss’” ou ce que vous 
voudrez. SUPERSONIC est un utilitaire de 
création sonore, véritable éditeur de sons en 
tous genres. Le logiciel est conçu pour vous 
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assister dans l'élaboration des sons les plus 
divers. Il permet d’agir sur tous les paramè- 
tres de l'instruction SOUND de manière fort 
originale. Modification de la période, durée, 
choix des enveloppes volume et tonalité. 
Dans ces deux cas, on obtient la représen- 
tation graphique de l'enveloppe, ce qui per- 
met de l’affiner pour qu’elle soit aussi pré- 
cise qu'on le désire. 

Les sons et enveloppes créés peuvent être 
sauvegardés sur cassette. Le logiciel possède 
une fonction, accessible depuis le menu (très 
original, par ailleurs, car présenté comme un 
organigramme), permettant d'obtenir direc- 
tement les lignes de Basic correspondantes 
et, éventuellement, leur édition sur impri- 
mante. Les sons peuvent être testés immé- 
diatement, on peut ‘‘’reboucler’’ certains 
paramètres, bref, c’est un utilitaire qui fera 
l'affaire de tous les créateurs à la recherche 
d'effets sonores un peu spéciaux. À possé- 
der, ne serait-ce que pour apprendre à jouer 
avec le son | 

Graphisme : 3, Son : 3, Animation : 1, Inté- 
rêt : 4, Originalité : 4. 


PROTEC-PHONIE 
INFORMATIQUE 


COMMODORE 128 
AMSTRAD CPC 
ATARI ST 
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LIVRES 
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A LA VITRINE DU 


ouvrages que nous avons lus pour vous 

ce mois-ci, ont des antécédents sur 
d’autres ordinateurs familiaux. 
Si cette pratique est avantageuse pour l’édi- 
teur, elle pourrait devenir rapidement dange- 
rousse pour le lecteur car les livres risquent 
de ne plus tenir compte des spécificités d'une 
machine donnée. C'est le cas des ‘’Premiers 
Programmes'"… - 


À es séries font recette, car trois des 


AMSTRAD, PREMIER PROGRAMMES" 
SYBEX 

Rodnay ZAKS 

98 FF 


Rodnay ZAKS est très connu dans le monde 
de la micro-informatique. Docteur en infor- 
matique, il enseigne la micro et est l’auteur 
de nombreuses conférences et livres sur le 
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sujet. C'est grâce aux qualités de pédagogue 
de l’auteur que nous pourrons dire que ce 
livre reste intéressant, bien qu'il ne considère 
pas les particularités de l’'AMSTRAD. 

Très clair, abondamment et agréablement 
illustré, accessible au plus jeune des débu- 
tants, il permet de comprendre les notions de 
base qu'il est indispensable de posséder pour 
arriver à l'écriture d’un premier programme. 
Définition de l'algorithme, établissement d’un 
organigramme, tests sur le papier, sont 
autant d'étapes par lesquelles il faut passer 
avant de rédiger un programme. Si vous sui- 
vez, à la lettre, les conseils de l’auteur, vous 
serez sur le bon chemin. 

Quelques exercices élémentaires sont propo- 


sés : le débutant, auquel s'adresse ce livre, 


aura tout intérêt à ne pas les négliger. 

En dernière partie, un glossaire traduit les ter- 
mes couramment rencontrés dans le jargon 
informatique. Première étape sur la route de 
la programmation, cette lecture devra être 
suivie par celle d'ouvrages plus spécifiques 
pour qui voudra tirer un meilleur parti du Basic 
de son AMSTRAD. 


‘MUSIQUE SUR AMSTRAD'" 
EDIMICRO 

lan WAUGH 

148 FF 


Traduit de l’anglais, l’auteur lan WAUGH est 
musicien professionnel et auteur du même 
titre sur d’autres ordinateurs. S'il est un livre 
que doit posséder l'utilisateur d'AMSTRAD 
désireux d'utiliser aux mieux les possibilités 
musicales de la machine, c’est bien celui-ci. 
Le manuel utilisateur des CPC est avare en 
informations concernant la génération des 
sons, et reste très théorique, voire herméti- 
que, sur ce sujet. L'ouvrage que nous avons 
lu pour vous est tout le contraire. Il est bien 
entendu qu’un non-musicien ne deviendra 
pas un prodige après l’avoir lu, par contre il 
comprendra comment est produit un son, 
quelles sont ses caractéristiques ; fréquence, 
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volume, enveloppe n'auront plus de secrets 
pour le lecteur. 

De même, un chapitre consacré à la musique 
lui fera découvrir ce qu'est une gamme, une 
mesure, une harmonie ou un accord. Les 
commandes SOUND, ENT, ENV sont ensuite 
détaillées. A'chaque fois, l’auteur propose à 
ses lecteurs un petit exemple en Basic per- 
mettant d’allier théorie et pratique. 

Vous apprendrez à bruiter et à composer sans 
avoir l'impression de peiner : tout est claire- 
ment expliqué. 


Si votre AMSTRAD était désespérément 
muet et ne savait que produire des sons 
galactico-débiles, les 240 pages de cet 
ouvrage vont vous le présenter sous de nou- 
veaux aspects. 


Éd ec 
MUSIQUE sur AMSTRAD 
CPC 464 Er 664 
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‘CLEFS POUR AMSTRAD” 
Ps! 


SI 
Daniel MARTIN 
130 FF 


Avec sa traditionnelle reliure spirale, cet 
ouvrage fait partie d’une série entamée avec 
d'autres ordinateurs. C'est une ‘’compila- 
tion’’ de toutes les informations qui ont été 
publiées sur l’AMSTRAD. On n'y trouve pas 
les détails, développés dans d’autres livres, 
mais l'essentiel y est résumé. 

Les 50 premières pages reprennent la des- 
cription (résumée) du Basic de l'AMSTRAD. 
Une section de 25 pages est consacrée au 


CLEFS POUR 
D'AMSTRAD 


langage machine avec le détail des mnémo- 
niques assembleur Z80. Le logiciel interne : 
routines utiles avec point d'entrée, conditions 
de sortie et fonctions réalisées, les vecteurs 
d'appel et d’'indirection, les variables 
système, les adresses des mots-clés, sont 
quelques unes des informations données 
dans la troisième section. 

Une description des principaux circuits inté- 
grés (8912, 8255, 6845 et Gate Array), ainsi 
que le détail des connexions complètent l’ou- 
vrage. Enfin, quelques trucs et astuces (trop 
peu nombreux) concluent ce livre. 

Si la place manque sur votre bureau, à côté 
de l’AMSTRAD, ou que votre budget a été 
sérieusement entamé par l’achat de l’ordina- 
teur, vous aurez peut-être quelques difficul- 
tés à vous constituer une bibliothèque 
‘’système’’ intéressante. ‘Clefs pour AMS- 
TRAD'’’ vous paraîtra alors indispensable, 
pour peu que vous ayez envie de mieux 
connaître le système d'exploitation de votre 
CPC. Ecrit pour le 464, il serait souhaitable 
que les prochaines éditions soient complé- 
tées avec les particularités des 664 et 6128, 
mais l’essentiel reste décrit. 


‘*LE LIVRE DU LECTEUR DE DISQUETTE"" 
MICRO APPLICATION 

BRÜCKMANN et SCHIEB 

149 FF 


Traduit de l’allemand, comme le reste de la 
collection; le seul reproche qu'on puisse faire 
à cet ouvrage est justement lié à des problè- 
mes de traduction. Pour le reste, on peut dire 
qu'il s’avèrera très vite indispensable aux uti- 
lisateurs d'AMSTRAD avec disquette. En 
près de 400 pages, vous obtiendrez une foule 
d'informations essentielles sur le hard et le 
système d'exploitation. 

Le contrôleur FDC 765 est détaillé, registre 


par registre, et vous découvrirez les secrets 
du formatage et de l’écriture-lecture sur dis- 
que. Structure du catalogue, routines les plus 
utiles, listing commenté de ia ROM contenant 
le DOS, ainsi que quelques routines cornplè- 
tent ce livre, véritable mine d'informations. 
Un schéma électronique du contrôleur est 
fourni. 

Bien structuré, ce livre est, sans nul doute, 
l'outil indispensable au programmeur dési- 
reux d'exploiter au mieux son lecteur de dis- 
quettes. À commander au plus vite si vous 
êtes de ceux-là. 


LE LIVRE DU LECTEUR 
DE DISQUETTE AMSTRAD 
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UN LIVRE DÉTL BECKER 


N VRAC... 


LE VRAI PRIX 
DES ORDINATEURS 


Notre confrère HEBDOGICIEL 
vient d'attribuer aux CPC 664 et 
CPC 6128 l'Oscar du meilleur 
rapport qualité-prix des ordina- 
teurs individuels. 


VOUS AVEZ 
DIT COMPATIBLE ? 


ERE INFORMATIQUE vient de 
ressortir trois de ses best-sellers 
en version compatible CPC 664. 
Il s’agit de Amélie Minuit, Maca- 
dam Bumper et Mission Delta. 


AUTO 
COLLANT 
CONTRE 
TIMBRES 


nr 2,10 F 


AMSTRAD ACTION 


Une nouvelle revue mensuelle 
pour les utilisateurs d'AMSTRAD 
vient de voir le jour en Angleterre. 
ll s’agit de AMSTRAD ACTION, 
consacrée presque exclusive- 
ment aux bancs d'essais de logi- 
ciels en tous genres, mais avec 
un prédilection pour les jeux. Le 
numéro 2 de Novembre est paru. 


CALAMITES 


Vans son article ‘Soirée Mon- 
daine’’ du n° 4 de CPC, Eddy 
DUTERTRE a indiqué que le 
PCW 8256 était en QWERTY. 
Or, cet appareil avait le clavier 
AZERTY. Il faut dire que les 
essais furent effectués après 
moultes passages au buffet ; 
alors, le lecteur nous excusera ! 
Par ailleurs, ce n'était pas la 
DMP 2000 qui était présentée | 
Dur, dur, la soirée ! 
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96200 LA GACILLY 


B.P. 2 


—— VOLEZ SUR 


De 


sante, prouvant votre intérêt pour ce 

genre de logiciels, nous avons décidé 
d'effectuer un test global et simultané des 
différents simulateurs de vol sur AMSTRAD. 
Disons-le tout de suite, aucun n'arrive à la 
cheville du célèbre ‘‘FLIGHT SIMULATOR Il" 
de SUBLOGIC disponible sur COMMODORE, 
APPLE, IBM et ATARI. Ceci est hélas regret- 
table et nous espérons, sans trop y croire, 
que SUBLOGIC comblera cette lacune. 
Mis à part ‘MISSION DELTA’ d'ERE INFOR- 
MATIQUE, seul français du lot, tous les logi- 
ciels testés viennent d’Outre-Manche et sont 
importés en France, entre autres, par GUIL- 


NIRERRACEI 


Distributeur Agréé 
Consell et SAV 
de la région Centre 
pour AMSTRAD FRANCE 


D: une demande sans cesse crois- 


Ne soyez pas 
consommateur ; venez 
bénéficier de nos 20 ans 
d'expérience en informatique 


23, rue de la Mouchetière 
Z.!. ingré 
45140 St. Joean-de-la-Ruelle 
Tél.: (38) 43.11.83 
ou (38) 72.22.83 
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LEMOT INTERNATIONAL SOFTWARE, 
annonceur de CPC. 

Chacun d’entre eux présente une particula- 
rité intéressante, et seul, peut-être, FLIGHT 
PATH 737 nous a semblé un peu limité. Atta- 
chez vos ceintures, nous décollons ! 


""RED ARROWS"”" 
DATABASE SOFTWARE 


Connaissez-vous les Red Arrows ? C'est la 
patrouille acrobatique de la Royal Air Force, 
le pendant de notre PAF (Patrouille Acroba- 
tique de France). Les Red Arrows volent sur 
un appareil appelé HAWK MK1, et c'est sur 
ce jet que vous avez la possibilité de ‘‘voler”’. 
Vous venez d'être affecté à la patrouille, ce 
qui suppose déjà que vous soyez un bon 
pilote. Il va falloir apprendre les figures une 
après l’autre pour être capable de les effec- 
tuer, par la suite, en entraînement avec le 
reste de la patrouille. Quand tout cela sera 
bien au point, vous pourrez participer à un 
meeting où aucune faute n'est permise. 

On s’entraîne ? Volets, pleins gaz, lâcher les 
freins : décollage ! Montée vers une altitude 
de travail et début d'évolution. Vous volez 
en solo et ne voyez que le ciel et la terre. Le 
tableau de bord est peu réaliste, mais si vous 
le voulez, en phase ‘‘apprentissage””, l’ordi- 
nateur va vous enseigner comment faire des 
boucles et même, en vol de patrouille, à tenir 
votre place d’équipier. Il vous servira ainsi de 
moniteur pour plusieurs figures. 

Les ordres du leader apparaissent au bas de 
l'écran et vous ne devez agir qu’à l’ordre 
‘GO !‘’. Ça n’est pas facile du tout et même 


si le HAWK simulé par le programme réagit 
avec la lenteur d'un 747 à pleine charge 
(c'est dommage), et si sa planche de bord 
manque de réalisme, arriver à tenir sa place 
dans la patrouille n’est pas une mince affaire. 
Ce qui est remarquable, c'est que vous voyez 
vos équipiers à travers la verrière. 

On peut piloter au clavier ou au joystick. Un 
bon programme pour son originalité mais un 
simulateur de vol manquant un peu de réa- 
lisme. Pourtant, on aime... surtout quand le 
pilote descend en parachute | 

Notice en français. Compatible 664. Version 
disque disponible. 


‘JUMP JET” 
ANIROG 


Le HARRIER, vous connaissez ? Ceux qui ne 
sont pas fanas d’aéronautique, en ont cer- 
tainement entendu parler lors de la ‘‘Guerre 
des Malouines”’ et si vraiment vous ignorez 
tout de cet avion, sachez qu'il s’agit d’un 
appareil à décollage et atterrissage vertical 
(le seul réellement opérationnel), en service 
dans la Royal Navy (Sea Harrier) et dans la 
Royal Air Force. 

Vous allez piloter le JUMP JET et, si vous 
êtes doué, gravir les échelons de la hiérarchie 
militaire en accomplissant vos missions avec 
brio. 1! vous faudra décoller du porte-aéronefs, 
intercepter et détruire les avions ennemis 
avant qu'ils ne vous abattent.…. et revenir sur 
le port. 

Un ADAV (Avion à Décollage et Atterrissage 
Vertical) ne se pilote pas aussi facilement et 
toutes vos erreurs seront sanctionnées, ce 
qui pourra écourter sérieusement la mission | 
Votre plein n'étant pas inépuisable, vous 
aurez aussi à lutter contre le temps et, au 
niveau le plus élevé, contre les éléments 
naturels. 

Le programme vous propose plusieurs vues 
de l'extérieur, avec toujours la planche de 
bord. Les indicateurs sont ‘’numériques’”, mis 
à part l'horizon artificiel et le radar. Les 
commandes disponibles sont les commandes 
classiques d’un avion plus celles des tuyè- 
res de propulsion. 

Une première vue situera votre appareil sur 
le pont, pendant le décollage, puis au-dessus 
de 300 ft (pieds), apparaissent le porte- 
aéronef et votre appareil (deux vues). Ceci 
est surtout utile à ‘‘l’atterrissage’’… 
Au-dessus de 200 ft, vous voyez le ciel (avec 
les nuages) et la mer (crête des vagues). Lors 
de l'attaque des appareils ennemis, ceux-ci 
apparaissent et grossissent.. À vous de les 


aligner dans votre-viseur et de déclencher, 
au bon moment, votre tir. 

Pour intercepter un ennemi, vous aurez la 
possibilité de vous aider du calculateur radar : 
en plaçant un marqueur sur l'image radar, 
vous obtenez la distance qui vous sépare de 
l'autre appareil. 

De même, lorsque vous voudrez rejoindre le 
porte-aéronefs, cette fonction vous sera du 
plus grand secours. 

La réalisation est soignée, même si la plan- 
che de bord manque un peu de réalisme, et 
l'avion répond bien. 

Le programme est annoncé comme ‘‘parlant 
avec un synthétiseur externe’”. Ne possédant 
pas cette interface, nous n’avons pu appré- 
cier la qualité de cette ‘‘option’’. 

Notons que la version que nous avons tes- 
tée devrait être maintenant retirée du mar- 
ché : un bug “empêchait la sélection du 
niveau. 


‘’MISSION DELTA" 
ERE INFORMATIQUE 


Seul logiciel de création française dans cette 
catégorie, MISSION DELTA vous met aux 
commandes de l’intercepteur ‘’COBALT"", un 
appareil sophistiqué sorti de l'imagination de 
l’auteur du logiciel mais néanmoins proche 
de la réalité. 

Le manuel, livré avec la cassette, vous offre 
toute une mise en scène qui vous placera 
dans la peau du pilote. Le logiciel, écrit entiè- 
rement en Basic (ce qui explique l’absence 


d'animation graphique), est scindé en trois. 


parties : l’école de pilotage et la mission ; une 
batterie de tests pour savoir si vous avez bien 
assimilé le manuel et si vous connaissez les 
possibilités de votre intercepteur. 

L'action se passe en IFR (vol aux instru- 
ments) : il n’y a donc pas de vue sur l’exté- 
rieur. Par contre, le réalisme des situations 
a été respecté, un exemple : vous avez à 
votre disposition un émetteur-récepteur radio 
pour communiquer avec la tour et le centre 
de contrôle. Ne décollez pas sans son auto- 
risation… 

La fonction ‘‘’école’’ vous permettra de pren- 
dre votre avion en main, sans risque d'être 
attaqué par un autre intercepteur. Entraînez- 
vous à atterrir avec l’ILS (atterrissage aux ins- 
truments) et à utiliser correctement tous les 
instruments disponibles sur votre appareil. 

En ‘’mission’”, il faudra intercepter l’ennemi 
avant qu'il ne détruise votre base, tout en 
prenant soin d'échapper à ses missiles (vous 
découvrirez avec l'expérience, les différen- 
tes parades et l’utilisation des leurres). Votre 
tâche sera compliquée par le risque de for- 
mation d’une zone DELTA dont on sait peu 
de choses. 

Simulateur très. complet en ce qui concerne 
les instruments disponibles, puisque même 
le parachute de freinage et le siège éjectable 
ont été prévus, on regrettera l’absence de 
graphisme ‘’extérieur’”, mais malgré tout, 
MISSION DELTA, en étant très proche du 
scénario aéronautique réel, présente beau- 
coup d'intérêt. 
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‘*FLIGHT PATH 737" 
ANIROG 


Agrémenté d’une musique du plus bel effet, 
FLIGHT PATH 737 nous laisse, hélas, sur 
notre faim. Si la vue initiale est très promet- 
teuse (il faut s’aligner dans l’axe de piste 
avant de décoller), le comportement de l’ap- 
pareil est assez décevant car beaucoup trop 
pointu : il posera certainement des problèmes 
aux débutants. Un exemple : la maigre 
marge de manœuvre lors des rentrées et sor- 
ties des volets. 

Après le décollage, votre but sera de franchir 
une chaîne de montagnes et de vous poser 
sur l'aérodrome situé derrière. Bon courage ! 


‘FLIGHT SIMULATOR"’’ 
MYRDDIN SOFTWARE 


Avec ce logiciel de simulation de vol, il vous 
sera donné de piloter plusieurs types d’ap- 
pareils, et ce en fonction du niveau choisi, 
au départ. Si le décor de la cabine reste iden- 
tique, il n’en est pas de même du comporte- 
ment des différents avions. 

Ecrit moitié en Basic, moitié en langage 
machine, ce simulateur n'est pas inintéres- 
sant bien que présentant quelques défauts. 
Il vous permettra d'évoluer sur une surface 
matérialisée par une grille de 16 x 16 carrés 
élémentaires. Dans certains de ces carrés, 
vous trouverez des repères ‘‘sol’’ qui seront 


visualisés lors de leur survol. Vous identifie- 
rez ainsi une tour, une pyramide, des terrains 
de formes géométriques, et même la marque 
"AMSTRAD". L'altitude devra être soigneu- 
sement choisie (entre 300 et 500 pieds) pour 
que ces ‘marques au sol’’ apparaissent de 
manière agréable. 

Deux aérodromes sont disponibles : vous 
pourrez vous yÿ poser, redécoller, faire des 
‘’TOUCH-AND-GO”’, etc. Le graphisme est 
de type vectoriel, mais l'animation est, hélas, 
saccadée au rythme approximatif d’une 
image par seconde. 

La planche de bord intègre différents instru- 
ments et indicateurs : volets, train, freins, 
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compte-tours, variomètre, indicateur d’alti- 
tude, altimètre, compas, vitesse indiquée et 
jauge de carburant. Certains instruments sont 
doublés d'un affichage numérique. Votre 
position est ainsi affichée. 

Au début, les montants du pare-brise et une 
croix (sorte de collimateur) en plein centre de 
l'écran sont gênants. Par la suite, on s’y habi- 
tue. Une touche a même été prévue, les 
débutants l’apprécieront lors des entraîne- 
ments à l'atterrissage, pour revenir d’où l’on 
vient. Un petit vol ? 

Commande des gaz au maximum, volets sor- 
tis, on lâche les freins. Le moteur vrombit et 
à 40 nœuds, on décolle. Rentrée du train et 
des volets et c’est parti pour la promenade. 
Les réactions de l'appareil sont un peu mol- 
les mais non désagréables. On peut s'entraî- 
ner aux tours de piste, visiter les lieux (sur- 
vol des points caractéristiques) et revenir au 
terrain pour l'atterrissage : moteur à 1200 
tours, volets sortis (attention au décrochage), 
l'approche n'est pas très facile au début... 

Arrondi et toucher (tiens, vous aviez oublié 
de sortir le train ?), manette des gaz sur réduit 
et un petit peu de freins pour s'arrêter. Alors, 
prêt pour un autre vol ? 

Pour ceux qui connaissent, ce logiciel res- 
semble assez au ‘‘FLIGHT SIMULATOR I" sur 
Apple ou TRS 80. Il a certaines lacunes (par 
exemple, il ne détecte pas la sortie en fin de 
piste à l'atterrissage). 


‘’FLIGHTER PILOT” 
DIGITAL INTEGRATION 


Le F15 Eagle est:un merveilleux avion de 
combat. Mettez votre casque et votre 
combinaison de vol car c'est sur cette 
machine, capable de voler à deux fois la 
vitesse du son, que vous allez décoller pour 
intercepter et tenter d’abattre un avion 
ennemi. 


Votre mission sera de protéger vos différen- 
tes bases aériennes, mais avant de devenir 
un pilote chevronné, vous aurez quelques 
heures de vol d'entraînement à faire : le 
combat tournoyant, ça ne s’improvise pas. 
Le simulateur propose plusieurs niveaux et 
des types de missions différents; allant de 
l'entraînement à l'atterrissage, au combat 
réel. Vous ne devriez pas vous lasser de si 
tôt. 

La planche de bord est un peu futuriste et 
s'éloigne assez de celle du F15, mais toutes 
les commandes et instruments de navigation 
et d'attaque sont présents. Vous utiliserez 
essentiellement l'horizon artificiel, le RADAR, 
le calculateur d'interception et l’ILS pour l’at- 
terrissage. ‘ 
L'avion réagit merveilleusement bien, ce qui 
est à signaler. Tonneaux rapides ou boucles 
et renversements sont réalisables. Attention 
aux fautes de pilotages : train ou volets sor- 
tis à trop grande vitesse, toucher de roues 
trop brutal, décrochaÿes, tout a été pévu. 
A défaut de mettre les pieds sur les freins 
(votre AMSTRAD ne vous le pardonnerait 
pas), actionnez-les d'un doigt. Les volets sont 
sortis, les réacteurs rugissent pleine poussée, 
post combustion allumée : lâchez les freins. 
L'avion roule et ne demande qu'à décoller. 
Tirez sur le manche et, une fois en l’air, ren- 
trez train et volets. Un coup d'œil sur le radar 
et, aidé du calculateur d'’interception, vous 
allez vous diriger vers l'avion ennemi. Dès 
qu'il sera en vue, sélectionnez votre arme- 
ment, alignez-les dans le collimateur et. 
feu | 

Facile ? Essayez pour voir ! ll ne se laisse pas 
faire. si vous le perdez de vue, vous pou- 
vez toujours regarder la carte ! 

Simulateur de vol bien réalisé, tant au point 
de vue du graphisme (piste au décollage et 
à l'approche, silhouette de l'avion ennemi), 
que de la rapidité de réaction de l'appareil, 
FIGHTER PILOT va vous faire découvrir les 
plaisirs du vol supersonique et du combat 


aérien. Heureusement que le programme ne 


pénalise pas les accélérations trop intensi- 
ves ! En ce sens, il est certainement le meil- 
leur simulateur qu'il nous a été donné de tes- 
ter sur AMSTRAD. 


CSA. Sofiuware 


55, rue Tondu — 33000 Bordeaux — 


Tél 56.96.35.23 Poste 31 


Importateur — Distributeur des programmes logiciels de la Sté PRIDE-UTILITES 


SYSTEME X 


Le SYSTEME X est un programme (RSX) d'extension à un système rési- 
dant qui apporte plus de 30 commandes supplémentaires à votre AMS- 
TRAD CPC 464 ou CPC 664. Etant donné la nature très compacte du 
code, il ne faut qu'environ 3k octets de la RAM, ce qui laisse une zone 
plus que confortable de programme. Le SYSTEME X utilise des com- 
mandes extérieures, identifées par la barre verticale “!” qui les précède. 


240 F 
RU DISQUEITE 


215 F 


F 
TRANSMAT der DISQUETTE 


Permet le transfert facile sur disques de tous logiciels sur bande. Pour 
un système à disques AMSTRAD DD!-1. 

e Modes de fonctionnement automatiques ou non-automatiques + Lec- 
teur global d'en-tête de disque + Adjonction éventuelle de réadressage « 
Programmes faciles d'effacement ou de changement de nom. 


BOURSE D'INFORMATIONS TRANSMAT 


Informations complémentaires pour passer des programmes difficiles 


TRANSMAT et SYSTEME X maintenant en ROM. 


F 20F 

TOMCAT DETTE DISQUETTE 
Le nec plus ultra de la duplication de sauvegarde bande à bande, grâce 
à ce programme simple, qui se charge pratiquement de tout, même 
sans er-tête, et normalement d'un seul coup. Si vous avez besoin de 
charger et d'imprimer des logiciels protégés, etc. vous aurez besoin du 
SYCLONE, le programme polyvalent bande à bande. Si vous n'avez 
besoin que de sauvegarder vos logiciels, qui peuvent être chargés à une 
vitesse quatre fois supérieure à la vitesse standard, il vous faut le TOM- 
CAT. Les performances et la facilité de fonctionnement du TOMCAT 
restent inégalées sur le marché. 


POUR VOTRE AMSTRAD 464 - 664 - 6128 


RSX 


Un ensemble RSX bande à bande qui apporte de 
nouvelles commandes ainsi que de NOMBREUSES 
POSSIBILITES pour votre CPC 464. 

e Sauvegarder vos précieux logiciels pour un charge- 
ment avec une économie de temps de 75% © Choix 
de sept vitesses de sauvegarde, 1 000 à 4 000 bauds 
e Pas besoin de SYCLONE pour le rechargement à 
grande vitesse e Lecteur global d'en-tête e Comman- 
des disponibles à partir du BASIC + Chargement et 
impression de programmes BASIC sauvegardés + 
Impression de vos bandes WELCOME. 


COMMENT COMMANDER : Cocher le(s) article(s) désiré(s) ou faites-en une liste sur une feuille à part — Faites le total + frais de port (20 F pour 


150 F_ 200 F F 
SYCLONE Are ADRUTE PRINTER TO Te DQUETTE 


Une extension de système résidante qui ajoute SIX 
nouvelles commandes à votre CPC 464/664. Un 
ensemble à deux programmes conçu pour l'impri 
mante AMSTRAD DMP1 (AMDUMP) et pour les 
imprimantes compatibles ESPSON (EPDUMPI. 

+ VIDAGE ECRAN dans tous les modes. Deux for- 
mats avec EPDUMP e Vidage texte dans tous les 
modes e Trois nouveaux types de caractères pour le 
DMP1 + Préciser les encres de fond (la version 664 
n'est pas disponible sur cassette). 


150F 200F 
SCRIPTOR| CASSETTE DISQUETTE 


Un élément essentiel pour Tes propnétaires d'impn- 
mante DMP-1. Six polices de caractères définissa- 
bles. Laissez faire votre DMP-1 sans extension. 

e Caractère à jambage inférieur e Futuriste + Itali 
ques e Compatible avec AMSWORD + Ecriture liée e 
Caractères gros et gras e Programme de définition 
de caractères e Une finition professionnelle pour 
votre correspondance. 


ODD-JOB 
Disque UTILITIES maintenant disponible à 


BON DE COMMANDE 


achats inférieurs à 500 F) Franco pour achats supérieur à 500 F 


ADRESSE 


Mode de paiment : Ü chèque/O mandat/D contre-remboursement (prévoir 20 F de frais) — envoyer le tout 


Le à : ESAT SOFTWARE, 55, rue du Tondu, 33000 Bordeaux 


MICRO:-C s.AR.L 


1, Av. du Gal. de Gaulle 
35170 BRUZ 
Tél.: 99.52.67.08 
Revendeur officiel AMSTRAD 


CPC 464 vert 
CPC 464 couleur 
CPC 664 vert 
CPC 664 couleur 
CPC 6128 vert 
CPC 6128 couleur 


Imprimante DML 200 (nouveau pour AMSTRAD] 


DDH-1 

FDI-1 .... 
Joystick .. 
Câble magnéto 
Disquette 3” .. 
Cassette C15 


LOGICIELS SCOLAIRES OU EDUCATIFS 


POUR SECONDAIRE 
— FONCTIONS {courbes et intégrales) 


{le pack de 2 sur K7 ou D : 200 F) 
POUR PRIMAIRE 
— Arithmétique [+, —, 
— Tables de calcul 

Île pack de 2 K7 ou D : 200F) 


— Microverbe (conjugaison) 
— Microgéo (géographie) 
{les 2 sur D : 350 F). 


F 200 F 
ZEDIS | PQTTE DISQUETTE 


Un désassembleur et programme d'édition de code à 
la fois global et convivial. Indispensable pour le 
néophyte tout comme pour l'expert. 

e Démontage complet ZB0 + Insertion de point 
d'interruption et contrôle de registre e Entrée sous 
forme hexadécimale/caractères e Recherche rapide 
forme hexadécimale/caractères © Instructions com- 
plètes pour le démontage des ROM's e Visualisation 
continue des menus + Pré-chargement du registre 
avant l'exécution e Sortie vers l'imprimante. 


TOMCAT 


SIGNATURE 


TRANSMAT 
SCRIPTOR 


RSX SYCLONE 2 
SYSTEME X 


PRINTER PAC 1 


Tél.: (56) 24.05.34 
257, rue Judaïque 


BORDEAUX 


200 logiciels et Jeux 
20 livres (dont Micro-application) 


Catalogue sur demande contre 11 F en timbres, remboursé sur achat. 
Pour commande, joindre chèque ou mandat {+ 30 F de port}. 


CPC 6128 
disponible. 


Nouveaux tarifs. 
Nous consulter. 
AVIGNON : (90) 22.47.26 


Pascal HIGELIN 


ous qui possédez un AMSTRAD, n’avez-vous 

jamais rêvé d’avoir un Macintosh ou même 

d'utiliser votre AMSTRAD pour faire des des- 
sins dignes de Mac-paint ? Si c’est le cas, alors lisez 
attentivement les lignes qui suivent. 


Cette série d'articles a pour objet 
de vous décrire la mise en route, 
l'utilisation et le fonctionnement 
du programme ‘‘Cherry-Paint”'. 
Comme vous pouvez le consta- 
ter sur les photos, l'écran res- 
semble assez à celui de Mac- 
paint, et ce n'est pas un hasard 
car le programme fonctionne uni- 


22 


quement en MODE 2, donc avec 
une résolution de 640 x 200 
points. On pourra apprécier la 
finesse du tracé, surtout sur un 
moniteur monochrome, car sa 
résolution est bien meilleure. 
Contrairement au Macintosh, 
l'AMSTRAD ne possède pas d’in- 
terface ‘‘’souris’”, aussi, ce sont 


CHERRY 
PAIN: 


les touches du curseur qui vont 
servir à déplacer les icônes et la 
barre d'espacement à ‘’cliquer’” 
sur les outils ou les trames. 


Dans ce premier épisode, nous 
allons nous occuper de créer la 
table des trames et l’image de 
fond pour le programme. Le pro- 
gramme ‘‘Cherry-Paint’’ ne pren- 
dra donc vie ‘que le mois pro- 
chain, lorsque fonctionneront le 
crayon, la gomme, la bombe de 
peinture, le pinceau, la manipu- 
lation, la sauvegade et la restitu- 
tion d’une image. Pour ces sau- 
vegardes, il serait de loin préfé- 
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rable de disposer d’un lecteur de 
disquettes pour ne pas atteindre 
des temps de chargement d'ima- 
ges prohibitifs. Le programme est 
entièrement compatible CPC 
464, 664, 6128. 


DESCRIPTION 
DES PROGRAMMES 


Le premier. programme de ce 
mois : s’appelle ‘’TRAMES"'. 
Comme son nom l'indique, ce 
programme Va transformer les 
trames de 16 X 8 points enregis- 
trées dans les lignes de DATA en 
un fichier binaire nommé 
‘’TR.BIN’". Ce fichier servira aussi 
bien à la création de l’image de 
fond que lors de l'utilisation du 
programme.‘‘Cherry-Paint’”. Si la 
forme des trames ne vous 
convient pas, il:est bien sûr facile 
de les modifier en changeant les 
Valeurs contenues en DATA, 
sachant que sur l’image de fond 
la trame 1 sera située en haut à 
gauche, la trame 2 en bas à gau- 
che-et ainsi de suite. 


Le second programme s'appelle 
‘’ECRAN’”’. Avant de le lancer, il 


à .\ 


«\ \ 


RAANANA 
\ 
Pa 


faudra vous assurer que le fichier 
“TR.BIN’’ créé par ‘’TRAMES"" 
est bien sur le disque. Le pro- 
gramme ‘’ECRAN'" va s'occuper 
de dessiner l’image de fond de 
‘’Cherry-Paint"’. Pour cela, il va 
procéder en plusieurs étapes. 


La partie initialisation sélectionne 
le mode, les couleurs, charge la 
table des trames et remplit l'écran 
de caractères grisés. 

Les parties suivantes commen- 
cent toutes par tracer un cadre 
rempli de blanc qui contiendra les 
différents objets (outils, pin- 
ceaux, trames, etc.). Tous ces 
objets sont tracés en coordon- 
nées relatives, il est donc très 
facile de les déplacer ; il suffit de 
modifier les coordonnées de 
départ. Evitez tout de même de 
déplacer trop d'objets, sinon il ris- 
que de se passer des choses sur- 
prenantes lors du fonctionnement 
de ‘‘Cherry-Paint’’ ! 


La dernière partie du programme 
va sauvegarder l'image ainsi 
créée sur disque sous le nom 
‘*’SCR.BIN’’ puis va boucler pour 
éviter d'écrire sur l’écran. 


‘. 
PA 


PA PA PA PA PP Pi 


retrouverai le mois proc 
la suite-de’cette série 8n.espérant 
que vous ayez eu le courage de 
taper ces quelque 20 k de Basic. 


110 ? CE PROGRAMME TRANSFORME 
LES TRAMES DE 16#8 POINTS 


120 ENREGISTREES EN DATA EN 
UN FICHIER BINAIRE NOMME | 
130 *TRBIN' | 
QD — 

150 : 


160 DATA €X00000000, &X00000000 
170 DATA &X00000000, &XD0000000 
180 DATA £X00000000, &XD000000 
190 DATA &X00000000, &X0000000, 
200 DATA &X00000000, &X00000000 : 
210 DATA &X000000802*00000100 
220 DATA &X00000000, &X0000000 
230 DATA &X00000000, &X 0000000 
240 ? : 
250 DATA &X11111411,8X1111111 
260 DATA &X11111111,8X11111111 
270 DATA &x11111111,8X11111111 
280 DATA &X11111111,8X11111111 
290 DATA &X11111111,8X11111111 


300 DATA &X11111111,8X11111111 
310 DATA &X11111111,8X11111111 
320 DATA &X11111111,8X11111111 
330 ? 

340 DATA &X00000000, &X00000000 
350 DATA &X00100000, &X00100000 
360 DATA &X00000000, &X00000000 
370 DATA &X00000010, &X00000010 
380 DATA &X00000000, &X00000000 
390 DATA &X00100000, &X00100000 
400 DATA &X00000000, &X00000000 
410 DATA &X00000010, &X00000010 
420 ? 

430 DATA &X11111111,8X11111111 
440 DATA &X11011111,8X11011111 
450 DATA &X11111111,8X11111111 
460 DATA &X11111101,8X11111101 
470 DATA &X11111111,8X11111111 
480 DATA &X11011111,8X11011111 
490 DATA &X11111111,8X11111111 
500 DATA &X11111101,8X11111101 
310 ? 

520 DATA &X00000000, &X00000000 
530 DATA &X00100010, &X00100010 
540 DATA &X00000000, &X00000000 
550 DATA &X10001000,&X10001000 
560 DATA &X0D000000, &X00000000 
570 DATA &X09100010,&X00100010 
580 DATA &X00000000, &X00000000 
590 DATA &X10001000, &X 10001000 
600 * 

610 DATA &X11111111,8X11111111 
620 DATA &X11011101,8X11011101 
630 DATA &X11111111,8X11111111 
640 DATA &X01110111,.8X01110111 
650 DATA &X11111111,8X11111111 
660 DATA &X11011101,&X11011101 
670 DATA &X11111111,&X11111111 
680 DATA &X01110111,8X01110111 
690 ? 

700 DATA &X00100010,&X00100010 
710 DATA &X10001000,&X10001000 
720 DATA &X00100010,&X0D100010 
730 DATA &X10001000, &X 10001000 
740 DATA &X00100010,&X00100010 
750 DATA &X10001000, &X 10001000 
760 DATA &X00100010, &X00100010 
770 DATA &X10001000, &X 10001000 
780 

790 DATA &X11011101,8X11011101 
800 DATA &X01110111,&X01110111 
810 DATA &X11011101,8X11011101 
820 DATA &X01110111,8X01110111 
830 DATA &X11011101,8X11011101 
840 DATA &X01110111,8X011101i1 
850 DATA &X11011101,8X11011101 
860 DATA &X01110111,8XD1110111 


880 DATA &X10101010,8X10101010 
890 DATA &X01010101,8X01010101 
900 DATA &X10101010,8X10101010 
910 DATA &X01010101,&X01010101 
920 DATA &X10101010,8X10101010 
930 DATA &X01010101,&X01010101 
940 DATA &X10101010,8X10101010 
950 DATA &X01010101,8X01010101 
960 ? 

970 DATA &X11001100,8X11001100 
980 DATA &X00110011,&X00110011 
990 DATA &X11001100,8X1 1001100 
1000 DATA &X00110011,8&X00110011 
1010 DATA &X11001100,8&X11001100 
1020 DATA &X00110011,&X00110011 
1030 DATA &X11001100, &X1 1001100 
1040 DATA &X00110011,&X00110011 
1050 

1060 DATA &X11110000, &X11110000 
1070 DATA &X11110000, &X1 1110000 
1080 DATA &X00001111,8X00001111 
1090 DATA &XD00001111,8&X00001111 
1100 DATA &X11110000, &X11110000 
1110 DATA &X11110000, &X1 1110000 
1120 DATA &X00001111,&X00001111 
1130 DATA &X00001111,&X00001111 
1140 

1150 DATA &X11111111,&X00000000 
1160 DATA &X11111111,&X00000000 
1170 DATA &X11111111,&X00000000 
1180 DATA &X11111111,&XD00000000 
1190 DATA &X00000000,8X11111111 
1200 DATA &XO0C00000,8X11111111 
1210 DATA &X00000000,8X11111111 
1220 DATA &XOD0000000,8X11111111 
1230 

1240 DATA &X11111111,8X11111111 
1250 DATA &X00000000, &X000C0000 
1260 DATA &X11111111,8X11111111 
1270 DATA &X00000000, &X00000000 
1280 DATA &X11111111,8X11111111 
1290 DATA &X00000000, &X00000000 
1300 DATA &X11111111,8X11111111 
1310 DATA &X00000000, &X00000000 
1920 

1330 DATA &X11001100, &X11001 100 
1340 DATA &X11001100, &X11001 100 
19350 DATA &X11001100,&X11001100 
1360 DATA &X11001 100, &X1 1001100 
1370 DATA &X11001100,8X11001100 
1380 DATA &X11001100,&X11001100 
1390 DATA &X11001100,&X11001100 
| 1400 DATA &X11001100,&X11001100 
1410 ? 

1420 DATA &X00001100,&X00001100 
1430 DATA &X00001100, &X00001 100 
1440 DATA &X00001100, &X00001 100 
1450 DATA &X00001100, &X00001 100 


1460 DATA &X00001100, &X00001 100 
1470 DATA &X00001 100, &X00001 100 
1480 DATA &X00001 100, &X000D1 100 
1490 DATA &X00001 100, &X00001 100 
1500 

1510 DATA &X00000000, &X00000000 
1520 DATA &X00000000, &X00000000 
1530 DATA &X11111111,8K11111111 
1540 DATA &X00000000, &X00000000 
1550 DATA &X00000000, &X00000000 
1560 DATA &X00000000, &X00000000 
1570 DATA &X11111111,8X11111111 
1580 DATA &X00000000, &X00000000 
1590 ? 

1600 DATA &X11111111,8X11111111 
1610 DATA &X11111111,8X11111111 
1620 DATA &X00000000, &X00000000 
1630 DATA &X11111111,&X11111111 
1640 DATA &X11111111,8X11111111 
1650 DATA &X11111111,8X11111111 
1660 DATA &X00000000, &X00000000 
1670 DATA &X11111111,8X11111111 
1680 

1690 DATA &X11110011,8X11110011 
1700 DATA &X11110011,8X11110011 
1710 DATA &X11110011,8X11110011 
1720 DATA &X11110011,8X11110011 
1730 DATA &X11110011,8X11110011 
1740 DATA &X11110011,8X11110011 
1750 DATA &X11110011,8X11110011 
1760 DATA &X11110011,&X11110011 
1770 

1780 DATA &X00001100, &X00001 100 
1790 DATA &X0000001 1, &X000000!1 1. 
1800 DATA &X11000000, &X1 1000000 
1810 DATA &X001 10000, &X00110000 


1820 DATA &X00001100, &X00001 100 
1830 DATA &X0000001 1,&X0000001 1 


1840 DATA &X11000000, &X1 1000000 
1850 DATA &X001 10000, &X001 10000 
1860 

1870 DATA &X00001 100, &X00001 100 
1880 DATA &X00110000, &X001 10000 
1890 DATA &X11000000, &X1 1000000 
1900 DATA &X00000011, &X0000061 1 
1910 DATA &X00001 100, &X00001 100 
1920 DATA &X001 10000, &X001 10000 
1930 DATA &X11000000, &X1 1000000 
1940 DATA &X00000011,&X00000011 
1950 ? 

1960 DATA &X00001000, &X00001000 
1970 DATA &X00010000, &X00010000 
1980 DATA &X00100000, &X001D0000 
1990 DATA &X01000000, &X0 1000000 
2000 DATA &X10000000, &X 10000000 
2010 DATA &X00000001, &X00000001 
2020 DATA &X00000010, &XC0000010 
2030 DATA &X00000100, &XC0000100 
2040 


| 2050 DATA &X00001000, &X00001000 
| 2060 DATA &X00000100, &X00000100 
2070 DATA &X00000010, &X00000010 
2080 DATA &X00000001, &X00000001 
2090 DATA &X10000000, &X 10000000 
| 2100 DATA &X01000000, &X01000000 
| 2110 DATA &X00100000, &X00100000 
2120 DATA &X00010000, &X00010000 
2130 

2140 DATA &X00011000, &X0001 1000 
2150 DATA &X00100100, &X00100100 
2160 DATA &X01000010, &X01000010 
2170 DATA &X10000001,&X10000001 
_ | 2180 DATA &X10000001,&X10000001 
_| 2190 DATA &X01000010, &X01000010 
| 2200 DATA &X00100100, &X00100100 
| 2210 DATA &X0001 1000, &X0001 1000 
| 2220 ’ 


. | 2230 DATA &X00001111,&X00000000 


_| 2240 DATA &XOU110000, &X 11000000 
| 2250 DATA &X11000000, &X001 10000 
| 2260 DATA &X00000000, &X00001 111 
2270 DATA &X00000000, &X00001111 
2280 DATA &X11000000, &X001 10000 
2290 DATA &X001 10000, &X11000000 
2300 DATA &X00001111, &X00000000 
2310 

2320 DATA &X001 10000, &X001 10000 
2330 DATA &X001 10000, &X001 10000 
2340 DATA &X11111111,8X11111111 
2350 DATA &X001 10000, &X001 10000 
| 2360 DATA &X001 10000, &X001 10000 
2370 DATA &X001 10000, &X001 10000 
2380 DATA &x11111111,8x11111111 
2390 DATA &X00110000, &X001 10000 
2400 * 

2410 DATA &X00111100,&X00111100 
2420 DATA &X11111111,8X11111111 
2430 DATA &X11111111,8X11111111 
2440 DATA &X001 11100, &X001 11100 
2450 DATA &X00111100, &X001 11100 
2460 DATA &X11111111,8X11111111 
2470 DATA &X11111111,8X11111111 
2480 DATA &X00111100, &X001 11100 
2490 ? 

2500 DATA &X001 10000, &X00000000 
2510 DATA &X00110000, &X00000000 
2520 DATA &X11111111,8X11111111 
2530 DATA &X00000000, &X001 10000 
2540 DATA &X00000000, &X00! 10000 
2550 DATA &X00000000, &X001 10000 
2560 DATA &X11111111,8x11111111 
2570 DATA &X00! 10000, &X00000000 
2580 

2590 DATA &X00001 100, &X00001 100 
2600 DATA &X00110011,&X00110011 
2610 DATA &X11000000, &X 11000000 
2620 DATA &X000000! 1, &X000000! 1 


2630 DATA &X00001 100, &X00001100 
2640 DATA &X00110011,8&X00110011 
2650 DATA &X11000000, &X 11000000 
2660 DATA &X00000011,&X0000001 1 
2670 

2680 DATA &X10000000, &X00000001 
2690 DATA &X10000000, &X00000001 
2700 DATA &X01100000, &X00000110 
2710 DATA &X00011111,8X11111000 
2720 DATA &X00000001, &X 10000000 
2730 DATA &X00000001, &X10000000 
2740 DATA &X00000110, &X01100000 
2750 DATA &X11111000,8X00011111 
2760 

2770 DATA &X10010000,8X00011111 
2780 DATA &X11100000, &X001 10000 
2790 DATA &X01111110,&X01000000 
2800 DATA &X11000011,&X10000000 
2810 DATA &X00000001,8X11111001 
2820 DATA &X00000011,8X00001110 
2830 DATA &X11100100,&X00000111 
2840 DATA &X001 11000, &X00001 100 
2850 

2860 DATA &X11000011,8X11111111 
2870 DATA &X11000011,&X00000000 
2880 DATA &X11000011,&X00000000 
2890 DATA &X11000011,8&K11111111 
2900 DATA &X11111111,8X11000011 


- | 2910 DATA &X00000000, &X1 1000011 


2920 DATA &X00000000, &X 11000011 
2930 DATA &X11111111,8X11000011 
2940 

2950 DATA &X10010001,8X10010001 
2960 DATA &X11100011,8X11100011 
2970 DATA &X11000111,8X11000111 
2980 DATA &X10001001,&X10001001 
2990 DATA &X10011000,&X1001 1000 
3000 DATA &X01111100,8X01111100 
3010 DATA &X00111110,8X00111110 
3020 DATA &X00011001, &X0001 1001 
3030 ’ 

3040 DATA &X01111110, &XD0000000 
3050 DATA &X10011111,8&X00000000 
3060 DATA &X11111111,X00000000 
3070 DATA &X01111110, &X00011000 
3080 DATA &X00000000,8X01111110 
3090 DATA &X00000000, &X10011111 
3100 DATA &X00000000,&X11111111 
3110 DATA &X00011000,8&X01111110 
3120 

3130 DATA &X00000000, &X00000000 
3140 DATA &X00000000, &XC0000000 
3150 DATA &X00001111,8X11111111 
3160 DATA &X00001111,&X11111111 
3170 DATA &X00001111,&X00000011 
3180 DATA &X00001111,&X0000001 1 
3190 DATA &X00001111,&X00000011 
3200 DATA &X00001111,&X11111111 


3220 DATA &X00000011,&X00000011 
3230 DATA &X00001111,8&X00001111 
3240 DATA &X00111111,8X00111111 
3250 DATA &X11111111,&X11111111 
3260 DATA &X00000011,&XD000001 1 
3270 DATA &X00001111,8X00001111 
3280 DATA &X00111111,&X00111111 
3290 DATA &X11111111,8X11111111 
3300 

3310 DATA &X0001 1000, &X0001 1000 
3320 DATA &X00111100,&X00111100 
3330 DATA &X01111110,8X01111110 
3340 DATA &X11111111,8X11111111 
3350 DATA &X11111111,8X11111111 
3360 DATA &X01111110,8&X01111110 
3370 DATA &X00111100, 8&X001 11100 
3380 DATA &X0001 1000, &X0001 1000 
3390 ? 

3400 DATA &X00001111,&X00000000 
3410 DATA &X00001000, &X00001 100 
3420 DATA &X00111100, &X00000000 
3430 DATA &X00111100, &X00000000 
3440 DATA &X00000000, &X01 1 11000 
3450 DATA &X00011000, &X01 111000 
3460 DATA &X00000000, &X00001 111 
3470 DATA &X00001111,&X00001111 
3480 

3490 DATA &X00000000, &X00000000 
3500 DATA &X00000000, &X10000000 
3510 DATA &X00000001, &X01 1 10000 
3520 DATA &X00000010, &XD1 111000 
3530 DATA &X00000100, &X001 11100 
3540 DATA &X00111100,&X00111100 
3550 DATA &X01011110,&X00001 100 
3560 DATA &X00111100, &X00000000 
3570 ? 

3580 DATA &X11111111,8X11111100 
3590 DATA &X11000000, &X00001 100 
3600 DATA &X11001111,8X11001100 
3610 DATA &X11001100, &X11001100 
3620 DATA &X11001111,8X11001100 
J630 DATA &X11000000, &X00001 100 
3640 DATA &X11111111,8X11111100 
3650 DATA &X00000000, &X00000000 
3660 

3670 DATA &X1101D111,8X11010111 
3680 DATA &X01010000, &X01010000 
3690 DATA &X01011111,8X01011111 
3700 DATA &X01000001,&X01000001 
3710 DATA &X01111101,8XD1111101 
3720 DATA &X00000101,&X00000101 
3730 DATA &X11110101,8X11110101 
3740 DATA &X00010100, &X00010100 
3750 ? 

3760 ADR7=&5000 


3770 FOR IX=1 TO 40#16:READ R:POKE ADRY 


, BL: ADRY=ADRY +1 :NEXT 
3780 SAVE*TR",B,85000, ADRY-85000 


CE PROGRAMME DESSINE L'IMAGE DE FOND POUR LE 
PROGRAMME DE SIMULATION DE MAC-PAINT, IL EST 
INDISPENSABLE QUE LE DISQUE CONTENANT LE 
FICHIER *TR,BIN" CREE AVEC LE PROGRAME 
"TRAMES" SOIT DANS LE LECTEUR. 


INITIALISATION 


msn 


220 CHARGEMENT DES DONNEES 
! 
ON 'RESERVE DE LA PLACE 
260 "CHARGE LA TABLE DE TRAMES 
210 12 
280 ? REDEFINITION DES CARACTERES FRANCAIS 
290 * 
300 SYMBOL 254,460, 410, &3C, R66, 7€, 60, R3C 
340 SYMBOL 255,L6, LR, LC, LéG, L7E, LD, KIC 
320 LA 
33%" INITIALISATION DE L'ECRAN 
. 
350 MODE 2 
360 IMK 0,26:1NK 1,0:BORDER 0 *POUR UN MONITEUR COULEUR: INK 0,13 
370 ’ 
30" REMPLIT L'ECRAN DE GRIS 
390 Li 


400 FOR 41 TO 25 
410 PRINT STRINGS(B0,207); 


450 DESSIN DU CADRE CONTENANT LES EPAISSEURS DE TRAIT 


pe tnt ut ont 3130 
n 7 150 10 5:MOVE 25,28-1#2:DRAUR 50,0:NEXT TRAIT D'EPAISSEUR 6 
ps re 1=0 T0 J:MOVE 25,42-I#2:DRANR 50,0:NEXT *TRAIT D'EPAISSEUR 4 
hot 1#0 TO 1:MOVE 25,52-1#2:DRANR 50,0:NEXT ?TRAIT D'EPAISSEUR 2 
Ep MOVE 25,60:DRANR 50,0 


'DESSIN DU CADRE (EN BLANC) 


?TRAIT D'EPAISSEUR 1 


570 ’ 
580 MOVE 25,68 *POINTILLE 
590 FOR I=1 TO 12 712 SEGMENTS 


600 DRABR 1,0:MOVER 3,0 *ALLUME 2 POINTS, AVANCE DE 2 


610 NEXT "POINTS PUIS RECOMMENCE 
820 DRAUR 1,0 PTERMINE PAR UN SEGENT ALLUME 
60". 


640 MOVE 13,24:DRANR 1,0:DRAWR 1,-2:MOVER D, -2 
650 DRAWR 2,0:DRANR 0,2:DRANR 3,6:DRAR 1,0 

660 LA 
670 ? 
689 DESSIN DU CADRE CONTENANT LES PINCEAUX 
690 ’ 
700 L 


DESSIN DU POINTEUR 


710 G4=10:D1=00:H1=190:B4=88:GOSUB 3130 

720 ' 

730 MOVE 45,188:DRAN 45,88, 1 

740 MOVE 46, 1B8:DRAN 46,88 

750 FOR 1=1 T0 2 

760 MOVE 10,190-J4#1:DRAW 80, 190-3481, 1 

770 NEXT 

780 L 

790 MOVE 20,180 

800 FOR I=1 TO 4 

810 DRAWR 15,0:DRAMR 0,-2 

820 DRAWR -15,0:MOVER 0, -2 

830 NEXT 

840 LA 

850 MOVE 60,174:DRAMR 3,0:DRANR 0,-2:DRANR -3,0 "DESSIN DU PETIT PINCEAU CARRE 
, 


"DESSIN DU CADRE 


DESSIN DU QUADRILLAGE 


DESSIN DU GROS PINCEAU CARRE 


870 MOVE 25,144:DRANR 5,D:MOVER 2,-2:DRAUR -9,0 ?DESSIN DU GROS PINCEAU ROND 
880 MOVER -1,-2:DRAUR 11,0:MOVER O,-2:DRAMR -11,0 


26 


890 MOVER 1,-2:DRAUR 9,0:MOVER -2,-2:DRAUR 
900 L É 


910 MOVE 20,104:DRAR 15,0 
920 + 

930 MOVE 54,98:DRAUR 15,15 
940 MOVE 55,98: DRAUR 15,15 
950 LA 

960 MOVE 61, 140:DRAUR 3, D:MOVER 1,-2 
970 DRANR -5,0:MOVER 1,-2:DRAUR 3,0 
960 À 
990 L 
1000 ” 
1010 * 
1020 
1030 GL=10:DX=80:H1=370:B1=200:60SUB 3130 

1040 * 

1050 MOVE 45,370:DRAN 45,200, 1 

1060 MOVE 46,370: DRA4 46,200, 1 

1070 FOR 1=0 T0 4 

1080 MOVE 10,370-34#1:DRAN 80, 370-3441, 1. 

1090 NEXT 

1100 ? 

1110 MOVE 22,338:DRANR 2, 10:DRANR 10,20:DRAMR 2,0 
1120 DRAWR 1,-2:DRAMR 1,0:DRAUR O,-4:DRAUR -9,-18 
1130 DRAWR -7,-6:DRAUR 1,2:MOVER 3,B:DRAMR 1,0 
1140 DRANR 1,-2:MOVER -1,2:DRAUR 8, 1 

1150 * 

1160 MOVE 22,312:DRAMR O,6:DRANR 9,0:DRAUR O0, -6 
1170 DRAUR -9,0:MOVER 10,2:DRAUR 3,6:DRANR 0,6 
1180 DRAWR -3,-6:MOVER -9,0:DRAUR 3,6:DRAUR 9,0 
1190 ? 

1200 MOVE 62,330:DRAUR O,-10:DRAUR 1,0:DRAUR O, 12 
1210 DRAUR 1,0:DRAUR D,-2:DRAUR 1,D:MOVER D, -4 
1220 DRAUR D,-6:DRAR -1,0:DRAUR O,6:MOVER -6, -8 
1230 DRAWR 11,0:DRAUR O,-10:DRAUR -1,-2 

1240 DRAWR -12,0:DRAMR 2,4:DRAUR O,6:MOVER D,-2 
1250 DRAUR 10,0:MOVER -1,-6:DRANR -1,0 

1260 MOVER -2,0:DRANR -1,D:MOVER -2,0 

1270 DRAUR -1,0:MOVER -2,0:DRAMR -1,0 

1280 ? : 

1290 MOVE 57,340:DRAUR 0, 1B:DRAWR 13,0:DRAUR U,-18 ‘DESSIN DE LA BOMBE 
1300 DRAWR -13,0:MOVER 1,20:DRANR 1,0:DRAUR 0,2 

1310 DRAMR 2,0:DRAMR 1,2:DRANR 3,0:DRAUR 1,-2 

1320 DRAWR 2,0:DRAMR 0,-2:DRAUR 1,0:MOVER -4,6 

1330 DRAWR -3,0:MOVER 7,-14:DRAUR -6,D:DRANR 0, -6 

1340 DRAMR 6,0:DRAMR 0,2:DRAMR -6,0 


MES D Fur ne 


DESSIN DU CADRE CONTENANT LES OUTILS 


"DESSIN DU CRAYON 


DESSIN DE LA GOMME 


DESSIN DE PINCEAU 


350 
1360 MOVE 24,272:DRAUR -4,8:DRAMR O, 10:DRAWR 1,2 
1370 DRAWR 1,0:DRAMR O,-B:DRANR 1,-2:DRAUR 1,2 
1380 DRAHR D, 10:DRAMR -1,2:DRAHR 1,2:DRAMR 1,0 
1390 DRAHR 2,-4:DRAMR D,-6:MOVER 0, IO:DRAUR 1,0 
1400 DRANR 2,-4:DRAHR D,-B:MOVER D, 10:DRAMR 3,-4 
1410 DRAMR D,-B:MOVER O,B:DRAUR 2,-4:DRAUR 0,10 
1420 DRAHR -3,-8 
1430 ? 
1440 MOVE 50,276 
1450 FOR I=1 T0 3 
1460  DRAMR 3,0:MOVER 5,0 
1470 NEXT 
1480 DRAMR 3,0 
1490 FOR I=1 T0 2 
1500 DRAWR 0,3:MOVER 0,5 
1510 NEXT 
1520 DRAWR 0,3:DRAUR -1,0 
1530 FOR I=1 T0 2 
1540  DRAWR O,-3:MOVER 0,-5 
1550 NEXT 
1560 DRAHR 0,-3:MOVER 1,18 
1570 FOR 1=1 T0 3 
1580  DRAUR -3,O:MOVER -5,0 
1590 NEXT 
1600 DRANR -3,0 
1610 FOR I=1 TO 2 
1820  DRAWR D,-1:H0VER 0, -7 
1630 NEXT 
1640 DRAHR O,-1:DRAHR 1,0 
1650 FOR I=1 T0 2 
1660  DRAWR D, L:MOVER 0,7 
1670 NEXT 


DESSIN DE LA MAIN 


DESSIN DU RECTANGLE 
*EN POINTILLE 


1680 DRANR 0,1 
1690 * 
1700 MOVE 28,282:DRANR 11,-22:DRAUR 1,0:DRAMR -2,0 "DESSIN DE LA LETTRE "4" 
1710 DRAUR -11,22:DRAUR O,-1:DRAUR 10,-20:DRAUR -3,0 
1720 DRANR 2,0:DRAUR -10,20:DRAUR -10,-20:DRAMR -1,0 
1730 DRAUR 4,0:DRAUR -2,0:DRAUR 10, 20:MOVER -5,-13 
1740 DRANR 12,0 
1750 ‘ 
1760 MOVE 50, 258:DRANR 26,-14 
1770 MOVE 51,258:DRAUR 24, -14 
1780 
1790 MOVE 14,22B:DRANR 28,0:DRAUR O,-20:DRANR -28,0 "DESSIN DU RECTANGLE VIDE 
1800 DRANR O,20:DRAUR 27,0:DRAMR D,-20:DRAUR -26,0 
1810 DRAUR 0,20 
1820 
1830 MOVE 49,226:0RAUR 28, 0:DRANR O,-20:DRANR -28,0 "DESSIN DU RECTANGLE PLEIN 
1840 DRAUR O,20:DRAMR 27,0:DRAUR 0, -20:DRAUR -26,0 
1850 DRAUR 0, 20 
1860 FOR 1=1 T0 5 

FOR dei TO 13 

PLOTR 2,0 
MENT 


DESSIN DE LA DROITE 


MOVER 1,-2 
FOR J=1 T0 14 
PLOTR -2,0 


DESSIN DU CADRE CONTENANT LA BARRE DE MENU 


ps Gl=-2:D4=640:H4=400: B4=380:GOSUB 3130 DESSIN DU CADRE 


2030 TAG:MOVE 40,397 *IMPRESSION DES OPTIONS 
2040 PRINT" Fichier Edition Facilit*+CHR$(235)+"5°; 

2050 PRINT® Caract°+CHR6(254)t'res Taille Stule'; 
2060 TAGOFF 

2070 L 

2080 MOVE D,380:DRANR 640,0,0 

2090 * 

2100 MOVE 21,382:DRANR 3,0, 1:MOVER 1,2:DRAWR -1,0 

2110 MOVER -2,0:DRAUR -2,0:MOVER 1,2:DRAUR 3,0 

2120 DRANR D, 4:DRAUR 3,6:DRAWR 1,-2:DRAMR 3,0 

2130 DRAUR 2,-2:DRANR -5,0:DRAMR 1,-2:DRAUR 5,0 

2140 DRAWR -1,-2:DRAWR -3,0:MOVER 2,-2:DRANR 2,0 

2150 DRANR 0,2 

2160 

2170 ? 

2180 ? DESSIN DES ARRONDIS DES COINS 
2190 ? 

2200 LL 

2210 MOVE D,392:DRAN 0,400, 1:MOVE 1,392:DRA4 1,400 

2220 MOVE 2,396:DRAN 2,400:MOVE 3,396: DRAM 3,400 

2230 MOVE 4,398:DRAM 4,400:MOVE 5,398:DRAM 5,400 

2240 MOVE 6,398:DRAH 6,400: MOVE 7,398:DRAU 7,400 

2250 L 

2260 MOVE 639,392:DRAM 639,400, 1:MOVE 638,392:DRAW 638,400 ‘COIN EN HAUT 
2270 MOVE 637,396:DRAU 637,400:MOVE 636,396:DRA 636,400  'A DROITE 
2280 MOVE 635,398:DRAN 635, 400:MOVE 634,398:DRAW 634,400 
2290 MOVE 633,398:DRAN 633, 400:MOVE 632,398: DRAM 632, 400 
2300 LL 

2310 MOVE 0,0:DRAN 0,7,1:M0VE 1,0:DRA4 1,7 

2320 MOVE 2,0:DRA4 2,3: MOVE 3,0:DRAN 3,3 

2330 MOVE 4,0:DRAN 4,1:MOVE 5,0:DRAN 5,1 

2340 MOVE 6,0:DRAN 6,1:MOVE 7,0:DRAW 7,1 

2350 L 

2360 MOVE 639,0:DRAW 639,7, 1:MÔVE 638,0:DRAM 638,7 

2370 MOVE 637,0:DRA4 637,3:MO0VE 636, D:DRA4 636,3 

2380 MOVE 635,0:DRAW 635,1:MOVE 634,0:DRAN 634,1 

2390 MOVE 633,0:DRAN 633,1:MOVE 632,0:DRAN 632,1 

2400 

2410 PLOT 639,9,0:PLOT 638,9,0:PLOT 637,5,0:PLOT 636,5,0 
2420 PLOT 635,3,0:PLOT 634,3,0:PLOT 633,3,1:PLOT 632,3,0 
2430 ? 

2440 _ 
2450 ’ DESSIN DU CADRE CONTENANT LA FEUILLE DE DESSIN 
2460 ? 

2470 


DESSIN DE LA CERISE 


*COIN EN HAUT 
?A GAUCHE 


COIN EN BAS 
*A DROITE 


*CORRECTIONS DUES 
*AU FOND TRAME 


2480 62295: D4=624:H1=365:B1=65:GOSUB 3130 

2490 ? 

2500 MOVE 95,345: DRAN 624,345, 1 

2510 FOR 1=349 TO 365 STEP 4 

2520 MOVE 105,1:DRAW 5 Î 

2530 NEXT 

2540 

2550 MOVE 320,361 :TAG 

2560 PRINT * SANS NOM *; 

2570 TAGOFF 

2580 ? 

259 —— 

2600 DESSIN DU CADRE CONTENANT LES TRAMES 

2610 ? 

2620 L 

2630 6X=90:D2=630:H4=48:B1=8:60SUB 3130 

2640 * 

2650 MOVE 152,28:DRAN 630, 28 

2660 FOR 1=1 T0 20 

2670 MOVE 632-1#24,4B:DRAMR 0, -40 

2680 DRAWR -1,0:DRAMR 0,40 

2690 NEXT 

2700 

2710 64=103:D4=136:H4=40:B1=16:60SUB 3130 

2720 

2730 PRINT CHRS(23)+CHR$ (3); : TAG 

2740 

2750 ORIGIN 0,0,0,639,46,30 

2760 FOR 1=0 TO 38 STEP 2 

2770  A=&5000+1#16 : 
: SYMBOL 254, PEEK(A),PEEK(A+2), PEEK(A#4), PEEK (+6), 
PEEK(A+B), PEEK(A+10), PEEKA#12) , PEEKCA#14) 
SYMBOL 255, PEEK(A+L), PEEK(A+3),PEENK(A#S),PEEKIA+7), 
PEEK(A+49),PEEK(A+11),PEEK(A+13),PEEK(A+15) . 
MOVE 152+24#1/2,46 UTILISE 2 CARACTERES 
PRINT CHRS(254)+CHR6(255)+CHR8(254) ; *Be8 POUR FAIRE UNE . 
MOVE 152+241/2,30 TRAME 1648 . 
PRINT CHRS(254)+CHR81255 )+CHR$ (254) ; 

2840 NEXT 

2850 ORIGIN 0,0,0,639,26,10 

2860 FOR 1=1 T0 39 STEP 2 

2870  A=45000+1#16 

2880 SYMBOL 254,PEEK(A) ,PEEK(A+2),PEEK(A+4) ,PEEKCA#O), 
PEEK(A+8), PEEX(A10), PEEKIA+12),PEEK(A+14) 

2890 SYMBOL 255,PEEKIA+#1},PEEK(A+3), PEEK(A+3),PEEX(A+7), 
PEEK(A+9),PEEK(A+#11), PEEK(A#13) , PEEK(A+15) 

2900 MOVE 152#248INT (1/2), 26 


'NOM DE L’IMAGE 


"DESSIN DU CADRE 


"DESSIN DU QUADRILLAGE 


"DESSIN DU PETIT CADRE 
*HODE GRAPHIQUE. "OR" 
*RANGEE. DU HAUT 


"RANGEE DU BAS 


“2910 PRINT CHRS(254)+CHR8(255)+CHR8(254); 


2920 MOVE 152+24#INT(1/2),10 

2930 PRINT CHRS(254)+CHR6(255)+CHRS1 254); 
2940 NEXT 

2950 PRINT CHRS(23)+CHR$ (D) : TAGOFF 


SAUVEGARDE DE L'INAGE REALISEE 


3010 SAVE'SCR",B, &COD0, &4000 "IMAGE DE CO00 À FFFF 
3020 G0TO 3020 "BOUCLE POUR NE PAS 
3030 "ABIMER L'HAGE 
3040 ” 

3050 "— - 

3060 ” SOUS-PROGRAMME DE. TRACE DE CADRES 

3070 EEE 

3080 "PARAMETRES: HZ : HAUT 

3090 ” Bt : MAS 

3100 GX 2 GAUCHE 

3110 © DA: DROITE 

3120 ? 

3130 FOR K1=62 TO DX 

3140 MOVE KA,BL:DRAW KZ,H2,0 

3150 NEXT 

3160 

3170 MOVE G4,BL:DRAN G2,H2, 1:DRAM DX,HX, 1 

3180 DRAN DZ,BX, 1:DRAM G4, 82, L:MOVE 6242, B1-2 

3190 DRAN D2+1,B2-2, L:DRAH DE+1,H4-2, 1:MOVE D2+2, 1-2 

3200 DRAH D1+2,H1-4, 1:MOVE D143,BX-2:DRAM is 

3210 MOVE Gt-1,BX:DRAN G-1,HL 

3220 

3230 RETURN 


MORPIONS 


GC: programme est un grand 
classique des jeux de straté- 
gie où vous jouez contre l'ordina- 
teur sur une grille de 10 x 10. 


Le premier qui réussit à aligner 
cinq de ses pions en horizontal, 
vertical ou diagonale a gagné. Un 
chronomètre indique la durée de 
la partie qui est limitée à une 
heure. 

Tapez ce logiciel qui allie une très 
belle présentation à un niveau de 
jeu surprenant par sa force et sa 


Daniel DEPINOY 


rapidité pour un programme écrit 
en Basic ! 

Entrez, dans un premier temps, le 
programme de chargement 
appelé Loader et sauvez-le sous 
le nom Morpion. Puis, entrez le 
programme de jeu que vous sau- 
verez avec le nom Morpion 1, 
juste après le programme Mor- 
pion. Lors de son exécution, le 
programme Morpion affichera 
une belle page titre et chargera 
automatiquement Morpion 1. 
Bon amusement. 


LES LOGICIELS PROFESSIONNELS DE 


pm informatique 


POUR VOTRE CPC 464, 664, 
6128 ET LE PCW 8256 


Réf PM 83A FICH ET CALC 


Gestion de fichiers - Vous créez vos fichiers et vous les 
exploitez - Classement par code - Séquentiel intégré - 
Éditions sélectives (Clients, stocks, paie, tarifs, inventaire, 


TTC 950 francs 


étiquettes, adresses - de prix). 


Réf PM 844 COURRIER TEXTE 


Traitement de courrier - Stockage de 20 textes de 200 


lignes. 


TTC 420 francs 


OOD:NEXT TEMPO 


2.0 
1 T0 2 


90 MOVE 0,x 
300 DRAYR 570,0, 1 


‘280 FOR x=0 TO 331 STEP 30: 
310 NEXT 


270 GRIGIN 30,30 
320 LOCATE 10,25:PRINT" 


330 INK 1,6:INK 
340 FOR TEMPO 


ui 
pa 


Réf PM 85A FICH ET CALC + COURRIER - TEXTE intégré 
Permet l'édition de courriers aux destinataires sélectionnés . 
dans les fichiers avec appel possible de renseignements 


contenus dans les fichiers. 


Réf PM 25A COMPTA PM 
10 journaux, 5000 comptes 
2000 écritures avec | disquette 


Remise à zéro en cours d'année possible avec reprise des 


TTC 1 450 francs 


cumuls. 


Réf PM 43A DEVIS FAC 


Fichier articles avec prix de vente. Rédaction et édition des 


TTC 1 200 francs 


LEZ] 


350 INK J,5:PEN J:PRINT CHR$(Z2)CHR$(1) 


J60 FOR x 


ER 
ii 
E 
El 
FM 
En 
Li 
Lo) 
el 
ET 


1 TO 19:LOCATE 11+%,11:SOUND 1 


1000, 10,5:PRINT MID$("par Depinou Danie 
1°,x,1):FOR tempo=i TO 100:NEXT:NEXT 


370 LOCATE 17,15:PRINT CHR3(164);" 1985" 


{ 


2: PRINT PROGRAMME E 


9 9 
és 


80 PEN 2:LOCATE 1 


3 


390 LOCATE 1,1:PRINT CHR$(22)CHR$(0) 


400 RUN “morpioni* 


1709 


OR NNNUERERÉÉRREE 


10 ? 


# JEU DU MORPION +# 


20? 


ler sept 1985 +* 
LAID EST IST 22111211 


+ 


, 


40 


c:NEXT 


50 ? 


60 MODE 1:BORDER 0 


70 ” 


80 * PRESENTATION 


2 THEN PLOT x,y,2:PLO 


T x,u-2:PLOT x+2,y:PLOT x+2,y-2 


devis et des factures. Livre de ventes. 
TTC 1050 francs 


Disquettes de démonstration + documentation = 365 francs dont 280 
francs déductibles lors de l'achat de la version complète. 
Envoyez votre adresse avec le chèque en précisant : 
- La référence PM 
- La version (démonstration ou complète) 
- Le type de votre CPC (664 ou 6128). 
à retourner à Microtex 
22, place de la république - 59170 CROIX 
tél. 20.98.66.86 


01.09.1985 
TO RER 


80 PRINT CHR$(23)CHR$ (0) 


y2-2 
x+4:x2=x2+2:y2=384:y 


210 LOCATE 1,2:PRINT SPC(10); 


par DEPINOY Daniel 
220 ORIGIN 0,30 


1 TO pixels:FOR f 


ILARD CRÉATIONS 99.31.6473 


y-4:u2 


100 FOR encre=0 TO 2:INK encre, 24:NEXT:] 


130 chars=LEN(title$):pixels=charst8:x 


INAETIIUITIZEIS TITI SITIT LISTES EES STE 
639-chars#32)/2:x2=0:y2=384 


20 * ### LOADER DU JEU LE MORPIGNS 
30 ? ##+ 

110 MODE 1:PAPER O:CLS:BORDER 24 
140 LOCATE 1,2:PEN 2:PRINT titles: 
160 LOCATE 10,25:PRINT"Patience 
170 FÜR g 

180 IF TEST(x2,y2) 

190 y 

230 FOR x= 30 TO 617 STEP 30 

240 MOVE x.0 

250 DRAWR 0,331,1 


200 NEXT:x 


90 title$="Morpions" :y=300: 


- 40 * #44 
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je 
ntrez un mot de trois à six let- 
tres, et ce programme affiche 


à l'écran ou sur imprimante tou- 
tes les combinaisons de ses let- 
tres, c’est-à-dire ses anagram- 
mes. Autre possibilité : entrez 
une à une les syllabes d’un mot 
ou d’une phrase (six éléments 
maximum), et ce sont alors ces 
combinaisons que l’on appelle 
contrepèteries. 


Le nombre de combinaisons est 
égal au ‘‘factoriel’’ du nombre 
d'éléments ; exemple avec qua- 
tre: 41=1x2x3x3= 24. Ainsi, 
on a 21=2 ; 31=6, 41-24 ; 
51=120 ; 61=720 et 7! = 5040. 
Vous comprenez alors pourquoi 
on a limité le nombre d'éléments 
de trois à six. : 
Certes, ce programme peut être 
classé ‘’utilitaire’’ pour certains 
usages rares, comme pour créer 
un nom pour une société, un pro- 
duit nouveau, un pseudonyme, 
etc., mais en toute sincérité, il a 
été conçu pour jouer, car certai- 
nes ‘‘solutions’’ affichées sont 
inattendues. Exemple : demandez 
les anagrammes du mot ECRAN 
et parmi les 120 solutions, vous 
trouverez CARNE, CRANE, 
ANCRE, ENCRA, CERNA et 
NACRE (essayez le mot ABUSIF 
et Vous aurez une surprise assez 
drôle... ). 

Lorsqu'il y a plus de six lettres, 
il faut passer en option ‘‘Contre- 
pèterie’’, où l’on entre des frag- 
ments du mot à mouliner. Peu 
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importe l'orthographe, ici seule la 
consonnance finale est intéres- 
sante. Ainsi ‘’piraté”’ va donner 
‘“‘thérapie’’, alors qu’en anagram- 
mes on obtient ‘‘paître’’, 
‘patrie’, “: 
On y passe des heures... (sou- 
vent tardives). 


LE LISTING 


Le sous-programme en 7000 est 
un titre fantaisie, avec un peu de 
son. Le programme réel com- 
mence en 1000 par le menu 
‘’anagrammes ou contrepète- 
ries””. 


LA PARTIE ANAGRAMMES 
(lignes 1100 à 1180) 


demande le mot à traiter ; il est 
mis en majuscules et mesuré. 
Puis, on demande ‘‘affichage à 


“l'écran ou sur imprimante ?‘. 


Dans les deux cas, ce sera en 80 
caractères par ligne (MODE 2), 
d’où calcul de NPL =nombre par 
ligne, en laissant un espace en 
début de ligne et entre chaque 
‘’solution””. 

Enfin, chaque caractère est indicé 
en M$(1). 


LA PARTIE CONTREPETRIE 
(lignes 1200 à 1290) 


invite à entrer élément par élé- 
ment (avec ENTER) ; ou conclue 
par une action sur ENTER. Cette 
fois, les M$({l) représentent des 
groupes de lettres (éléments). On 


Le 
10 


partie’” et ‘‘repait'’. 


ER 


(( Michel ARCHAMBAULT 


calcule la longueur totale LTOT 
en caractères, alors que L est le 
nombre d'éléments, et bien sûr 
calcul du NPL. I! n’y a pas d’op- 
tion imprimante. 


L'ECRAN 
(lignes 2000 à 2060) 


est en MODE 2 avec deux WIN- 
DOW : un bandeau supérieur de. 
trois lignes (# 1) où l’on trouve les 
deux options en fin d'affichage, 
à savoir M =retour au menu prin- 
cipal et P pour passer à la page 
d'écran suivante. En haut à 
droite, le numéro de la page 
d'écran en cours. Un trait continu 
sépare les deux WINDOW. La 
partie inférieure de l'écran 
comprend vingt lignes d'affi- 
chage. 


LE TRAITEMENT 
(lignes 3000 à 3320) 


C'est bien sûr le ‘’gros morceau’” 
(rnerci Aspro.... ). C'est une suite 
de boucles FOR NEXT imbriquées 
avec des GOTO conditionnels 
aux NEXT correspondants (lignes 
3240 à 3290). À chaque ‘’rem- 
plissage de case’’ A1, A2, A3, 
etc., on contrôle que cet élément 
n'a pas été utilisé antérieurement. 
S'il est ‘’neuf’”, on le concatène 
à la chaîne B$ en cours de cons- 
truction. Lorsque B$ a ses L élé- 
ments, on l'envoie en GOSUB 
5000 {ligne 3220) pour se faire 
afficher ; B$ est ensuite remise 
à zéro {ligne 5070) et on recom- 


-mence jusqu'à la fin des combi- 
naisons possibles. 


L'ECRITURE 
(lignes 5000 à 5050) 


Les solutions B$ sont écrites à la 
suite mais comptabilisées sur une 
ligne par T, jusqu’à T = NPL où il 
y a saut de ligne. Ligne 5030, la 
fonction VPOS arrête l’écriture 
lorsque l’écran est rempli. On est 
alors dans l'attente de frappe de 
‘M’! ou ##p°'. 

Lorsque l'ordinateur a terminé 
son travail, il le signale par un 
‘son étrange venu d’ailleurs’” 
(ligne 3310). 

Les 120 anagrammes d'un mot 
de cinq lettres tiennent sur une 
demi-page d'écran ; les 720 ana- 
grammes d’un mot de six lettres 
demandent trois pages et demi. 
En revanche, une contrepèterie 
de cinq éléments, mais totalisant 
quinze caractères, ira jusqu’à la 
. moitié de la page deux. 

Si en anagrammes vous avez 
opté pour l'imprimante, c'est 
beaucoup plus simple, car il n’y 
a plus de discontinuïté dans l'écri- 
ture (ligne 5060 avec flag 
IMP = 1). 


LE TITRE 
(lignes 7000 à 7900) 


Nous sommes en MODE O et 
chaque chaîne paraît bizarre 
puisqu'il s’agit d’anagrammes. 
Puis, lettre par lettre, tout est 
remis dans l'ordre. Un autre son 
‘’étrange”” (ligne 7500) fait la 
transition avec la page menu. 


LE FINAL 
(lignes 1400 à 1420) 


Appelé par l'option ‘‘F’’ du 
menu : BORDER, PAPER et PEN 
sont remis aux valeurs habituel- 
les par défaut ; puis CLS et END. 


CONCLUSION 


On peut, bien sûr, entrer des chif- 
fres ou des signes de ponctua- 
tion, combiner anagrammes et 
contrepèteries en plusieurs pas- 
ses. Les moules au minet ! Hein 
? Heu... pardon... : Moulinez les 
mots | 


10 * MOULIMOT / AMSTRAD CPC 


20 * ANAGRAMMES & CONTREPETERIES , sur M- 


ot de trois a six Elements. 

30 ? Michel Archambault - 9 / 1985 

100 GOSUB 7000:’ TITRE 

1000 * MENU 

1010 MODE 1:BORDER 9:INK D,1:INK 1,24:PA 

PER 2:CLS:DEFINT A-2 

1020 LOCATE 13,5:PEN 3:PRINT "MOULI 

MOT" 

1030 PEN O:LOCATE 12,10:PRINT "A - ANAGR 

AMMES, * 

1040 LOCATE 12,12:PRINT "C - CONTREPETER 
ES. * 

1050 LOCATE 12,14:PRINT °F - FIN.* 

1060 TEX$="ACF" :G0SUB 50000:0N K 60TO 11 

00, 1200, 1400 | 

1100 CLS:LOCATE 11,10:PRINT "{ 3 a 6 le 

ttres ) 

1105 LOCATE 6,12:PRINT °{ 6,24,120,720 c 

combinaisons )* 

1110 PEN 3:LOCATE 8,8:INPUT "VOTRE MOT : 
°,MS$:MS$=UPPERS (M$) :PEN 0 

1120 LELEN(M$)s IF LC OR L>6 THEN PRINT 
CHR$(7)5:G0T0 1100 

1190 PEN J:LOCATE B,17:PRINT "Sur ECRAN 

ou IMPRIMANTE ?* 

1140 TEX$="EI":GOSUB 50000:1IMP=K-1:1F 1M 

P THEN PRINT 48,CHR$(27) ;CHR$ (64); 

1150 NPL=INT(79/(L+1)) 

1160 FOR I=1 TO L:M$(I)=MIDS(MS,1,1):NEX 
T 

1180 GOTO 2000 

1200 CLS:LOCATE 12,5:PRINT "{ 3 a 6 Syll 

abes ) 

1210 LOCATE 6,7:PRINT "{ 6,24,120,720 co 

mbinaisons } 

1220 PEN 3:LOCATE 2,3:PRINT "Votre MOT , 
par syllabe :"::PEN O:PRINT" (ENTER=fin) 
“s:1=1:LT0T=0 

1230 PEN J:LOCATE 15,2#1+7:INPUT"",M$(1) 
1240 IF M$(1)=°" AND 133 THEN I=1-1:G0T0 
‘1260 

1250 IF Ib THEN 1=1+1:G0T0 1230 

1260 FOR J= 1 TO I:LTOT=LTOT#LEN(MS#(J)): 

NEXT:L=I 

1270 NPL=INT(79/(LTOT+1)) 

1290 PEN 0:G0TO 2000 

1400 ‘FINAL 

1410 BORDER 1:PAPER O:PEN 1:CLS 

1420 END 

2000 ’ECRAN 

2010 MODE 2:INK 0,14:INK 1,0:BORDER 13:P 

APER O:PEN 1 

2020 WINDOW #1,1,80,1,4:CLS #1 

2030 WINDOW #0,1,80,5,25:CLS #0 

2040 LOCATE #1,26,2:PRINT #1,"M =. MENU 5; 
P = Page suivante." 

2050 PG=1:LOCATE #1,70,2:PRINT #1, "PAGE 
":PG 

2060 LOCATE #1,1,3:PRINT #1,STRINGS (80, ” 
*) 

3000 * TRAITEMENT 

3020 R$="" 

3030 FOR Ai=1 TO L:B$=M${A1) 


3040 FOR A2=1 TO L 

3050 IF A2=A1 THEN 3280 

JO6D R$=M$ (A1 )+M$ (A2) 

3070 FOR A3=1 TO L 

3080 IF A3=A1 OR AJ=A2 THEN 3270 

3090 B$=M$(A1)+M$(A2)#$ (A3) 

3100 IF L=3 THEN 3220 

3110 FOR A4=1 TO L 

3120 IF A4=A1L OR A4=A2 OR A4=AJ THEN 326 

4] 

3190 B$=M$(ALI+MS(A2)+M$ (AS) +M$ (A4) 

3140 1F L=4 THEN 3220 

3150 FOR A5=1 TO L : 

3160 IF AS=A1 OR AS=A2 OR A5=A3 OR A5=A4 
THEN 3250 

3170 B$=MS(AL)+M$(A2)+M$(AT)+MS (A4) +MS (A 

5) 

3180 IF L=5 THEN 3220 

3190 FOR Ab=1 TO L 

3200 IF A6=A1 OR AB=A2 OR Ab=AJ OR AB=A4 
OR A6=AS THEN 3240 

3210 B$=MS(AL)+M$(A2)+M$ (AS) +MS (A4 )+MS CA 

5)+M$ (A6) 

3220 GOSUB 5000 

3230 ON L-2 60T0 3270,3260, 3250, 3240 
3240 NEXT 


| 3250 NEXT 


3260 NEXT 


.3270 NEXT 


3280 NEXT 

3290 NEXT 

3300 IF IMP=1 THEN PRINT #9:PRINT #8, CHR 

$(27) ;CHRS(64):RUN 1000 

3310 EN 1,100,2,2:ENT 1,100, -2, 2:S0UND 

1,220,150,1,1,1 

3320 Q$="":MHILE Q$="" :Q$=UPPERS( INKEYS) 

2WEND:IF Q$="M" THEN RUN 1000 ELSE 3320 

5000 ? ECRITURE 

5010 IF IMP=1 THEN 5060 

5020 TeT#+1:PRINT " "3B6321F T=NPL THEN T 

=0:PRINT CHR$(13) 

5020 IF VPOS(4O)=21 THEN Q$="":HHILE Q$= 

*:Q8=UPPERS(INKEYS) :MEND: IF Q$="M® THEN 
RUN 1000 ELSE IF Q$C"P* THEN 5030 

5040 1F VPOS(40)=21 THEN CLS:P6=P6+#1 :LOC 


" ATE#1,70,2:PRINT #1, "PAGE ";PG 


5050 G0TO 5070 

5060 T=T+1:PRINT 48," ":B$;:1F T=NPL THE 
N T=O:PRINT. #9, CHR$(13) 

5070 B$=°": RETURN 

7000 TITRE 

7010 MODE O:BORDER 8 

7020 PAPER 7:PEN 2:CLS 5 

7030 LOCATE 3,7:PRINT "IMOTULM O0" 
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DU 6 AU 9 DÉCEMBRE 1985 


HOTEL-EXPO, HOLIDAY INN 


PARIS - PORTE DE VERSAILLES 


LES MATÉRIELS, LES LOGICIELS, 
LES LIVRES, LES PÉRIPHÉRIQUES 
ET SERVICES... 
L'UNIVERS AMSTRAD 


Le 1° salon exclusivement réservé à 
l’univers AMSTRAD. 
Vous y trouverez les dernières nou- 
veautés : matériels, logiciels, péri- 
phériques et services. 


Accès : 

Bus : PC - arrêt Porte de Versailles. 
Métro : Station Porte de Versailles. 
Boulevards extérieurs et périphéri- 
ques. 

Parking : Parc des Expositions. 


QUATRE JOURS D'EXPO À NE SURTOUT PAS MAN- 
QUER, QUE VOUS SOYEZ OÙ NON POSSESSEUR. 


Ouvert de 10 h 00 à 18 h 00 à 
HOTEL-EXPO Holiday Inn, 

73, Bd. Victor, 75015 PARIS. 
Porte de Versailles 


Une promotion exemplaire | 
Affichage, presse, radios, télémati- 
que (serveurs), mailing et invitations 
feront de ce salon un véritable suc- 
cès. 


QUATRE JOURS EXCEPTIONNELS 
D'AFFAIRES, DE JEUX ET CONCOURS... 


Entrée : 

Du venäredi au lundi ; adulte : 25 F 
Enfant de moins de 14 ans : 10 F 
Ticket unique par correspondance, 
évitez l'attente : 15 F 


DE eee 


Exposants : | 

Les développeurs sur AMSTRAD et 
les sociétés distribuant du matériel 
compatible AMSTRAD sont nos 
exposants. Si vous aussi avez créé, 
contactez-nous rapidement. 


AMSTRAD EXPO (APC, 109 rue Gaston Lauriau, 93100 MONTREUIL, Tél.: 48.59.71.01) 


Veuillez me faire parvenir 


Je joins un chèque de 
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x 15F =... 


tickets uniques au prix de 15 francs chaque. 


SÉRIE F à l’ordre de DAD. 


7040 PEN S:LOCATE 9,12:PRINT "par* 

7050 PEN 1:LOCATE 2,14:PRINT "Chimel Cha 

multarba" 

7060 PEN 12:LOCATE 8,17:PRINT "1589" 

7070 FOR 1=1 TO 20:SÜUND 1,0, 20, 15:NEXT 

7080 PEN 5:LOCATE 2,23:PRINT "Ho!.. excu 

sei-moi... 

7090 FÜR 1=1 TQ 100U:NEXT 

7100 X$="M OU L I MO T':Y$="Michel Arc 

hambault":2$=°1985" 

7110 PEN 1:FCR 1=1 TO LEN(X$) :LOCATE 2+] 

5 T:PRINT MID$(X$,1,1):FOR J=1 TO 200:NEX 

T:NEXT 

7120 PEN 2:FOR 1=1 TG LEN(Y#):LOCATE 1+1 

«14: PRINT MID$(Y$,1,1):FOR J=1 TO 200:NE 

XT:NEXT 

7190 PEN 4:FOR 1=1 TO LEN(Z$):LOCATE 7+ 

1,17:PRINT MID$(2$,1,1):FO0R J=1 TO 20D:N 

EXT:NEXT 

7140 PRINT CHR$(20):FOR 1=1 TO !OOD:NEXT 

7500 ENT 1,100,-2:,2:S0UND 1,284,200, 13,0 
1 

| 

7600 FOR 1=1 TO Z000:MEXT 

7900 RETURN 

50000 ’REPONSE À UN MENU 

50010 LT=LEN(TEXS) :R$="° 

50020 LOCATE 15-LT,24:PRINT "Reponse ("; 

50030 FOR I=1 TO LT-1 

50040 PRINT MID$(TEX$,1,1)3°,"3:NEXT 

50950 PRINT RIGHT$(TEX$,1);")" ;CHR$(154) 
CHR (243) 3; CHR$(207) 

50060 TEXS=UPPERS(TEXS) 

50070 HHILE R$="° :R$=INKEYS :WEND 

50080 R$=UPPERS (RS) :K=INSTRITEXS, R$) 

50090 1F K=Q THEN R$="":PRINT CHR$(7)5:G 

OTO 50070 

50100 RETURN 

65535 *----- FIN DE LISTING ------- 


MICRO- 
ORDINATEUR 82 


LE SPECIALISTE AMSTRAD 
A MONTAUBAN 


ORDINATEURS CPC 
464, 664, 6128 et PCW 8256 


Nombreux logiciels et 
périphériques 


39, rue de la Comédie 
‘(près du Théâtre) 
82000 MONTAUBAN 
Tél.: 63.66.27.22 


KILOBYTE 


Imaginez que votre AMSTRAD 
vient de tomber en panne : il ne 
lui reste plus qu’un petit kilo-octet 
de mémoire. Saurez-vous écrire 
-des programmes originaux per- 
formants qui ne tiennent que 


dans ce kilo-octet ? Attention ! 
vos programmes devront être 
écrits en Basic, mais les routines 
en code machine présentées sous 


forme de data sont acceptées. 


Les fainéants ont bien travaillé ce 
mois-ci. Nous avons sélectionné 
deux programmes qui rapportent 
à leurs auteurs un superbe livre 
d'aventure. Rémi LAPORTE a 
décidé d'arrêté de se shooter 
depuis qu'il a écrit Délirium sur 
son AMSTRAD. Ça fait le même 
effet, et surtout, ça coûte moins 
cher. Voici réunis les 708 octets 
les plus dangereux de l’année... 
David WELCHE, quant à lui, pro- 
pose un programme passionnant 
qui vous permettra d'acquérir en 
jouant une dextérité phénomé- 
nale au clavier. Vous voyez que 
l'on peut en loger de belles cho- 
ses dans un kilo-octet. 


1 REM = DELIRIUN —---------- 
2 REM — Disque d'Infinie Repetition - 
J REM --—--- RLAPORTE - 28/9/85 

10 MODE 1 

20 ORIGIN J320,180:DEG:FOR L=0 TO 15 

J0 FOR a=i TO 1500 

40 x=81 

50 u=250 

60 INK 2,0,2b:PEN 2:LOCATE 17,2:PRINT'DE 
LIRIUM" 

70 ENV 1,17#RND(a),1,294RND(a):ENT 1,194 
RND(a),-2,27#RND(a) : SOUND 1,0,5,15,0,0, 1 
S#RND (a) 

80 INK 0,26,0:BORDER 26,0: INK 1,30#RND(a 
),26:PEN 1:SPEED INK 0.5,0.5 

90 DRAW y#COS{SO0#RND(b) ), x#SIN(SOO#RND( 
b)):2=2+5 

100 IF z)5000 THEN G0TO 130 

110 NEXT a 

120 NEXT b 

130 SOUND 129, 1600,-32000, 14,0,0, 0: SOUND 
190, 1620,-32000, 14,0,0,0:FO0R a=1 T0 360 
ORIGIN 320, 180: INK 1,0,26:PEN 5:DRAW 25 

D#C0S(a),B04SIN(a):NEXT a 

140 RUN 

150 REM —— Cest FINI: 708 octets ! —- 


Faites-nous parvenir vos pro- 


.grammes Sur cassette, accompa- 


gnés d’une brève explication. Les 
cassettes vous seront retournées 
si vous le demandez. 

Alors, tous à vos claviers. Il faut 
réussir à loger le maximum d'in- 
telligence dans un kilo-octet. Les 
meilleurs programmes seront mis 
à l'honneur dans CPC et leurs 
auteurs récompensés. 


10 MODE D:PAPER B:BORDER 22:r=100:1=0 
20 EVERY 300,0 GOSUB 370 

30 CLS:PEN b:LOCATE 4,2:PRINT" Temps util 
ise* 

40 PEN 7:LOCATE 6,7:PRINT° Temps moyen* 
50 PEN 9:LOCATE 3,13:PRINT'Lettres a tap 
er° 

60 PEN 10:LOCATE 3,18:PRINT"Lettres lape 
es" 

70 FOR n=1 TO 10:FOR m=1 TO 1000:NEXT 

80 t$="":a$="":RANDOMIZE TIME 

90 HHILE LEN(t$)<S5 

100 p$=CHR$(INT(RND#26)+65) 

110 t$=t$tp$ 

120 WEND 

130 PEN 13:LOCATE 8,15:PRINT t$ 

140 LOCATE 8,20:PEN 1D:PRINT"--—-" 

150 a=TIME 

160 WHILE LEN(a$)<5 

170 s$=UPPERS(INKEY$) 

180 IF s$OMIDS(t$,LEN(a$)+1,1) THEN 170 
190 a$=a$ts$ 

200 PEN LEN(a$) :LOCATE 7+LEN(a$),20:PRIN 
T s$ 

210 WEND 

220 PRINT CHR$(7) 

230 b=TIME 

240 tin)=(b/300)-(a/300) 

250 PEN 11:LOCATE 5,4:PRINT USING "##.44# 
#"itn);:PRINT" 5." 

260 t=0 

270 FOR j=i TO n 

280 t=t+t{j) 

290 NEXT 

300 PEN 12:LOCATE 10,9:PRINT USING "44.# 
#4" st/n;:PRINT" s.° 

310 NEXT 

320 IF tr THEN rt 

330 PEN 4:LOCATE 3,23:PRINT" RECORD" : PEN 
15:LOCATE 10,23:PRINT USING "##.##4";r/1 
O;:PRINT" 5.°:FUR m=1 TO 250:NEXT 

340 PRINT:PEN b:INPUT"ENCORE" ;2$ 

350 IF LEFT$(2$,1)="0" THEN 30 

J60 END 

370 BORDER 1:1=1+1:1F 1=27 THEN 1=0 

J80 RETURN 


TELEPHONE 


Une ligne téléphonique est à. 
votre disposition, vous mettant 
en contact direct avec la rédac- 
tion. Ceci est un service sans 
égal ! Respectez simplement les 
horaires et les jours que nous 
vous indiquons : 

MERCREDI de 9 h à 12h et de 
14hà17h. 

VENDREDI de 9 h à 12 h seule- 
ment. 

Tout appel en dehors de ces cré- 
neaux sera refoulé : ne dépensez 
pas inutilement votre argent | 
Le numéro : 99.52.98.11. 


Poisir 
INFORMATIQUE 


Micro-ordinateurs 
Accessoires 
Nombreux logiciels 


4 MAGASINS EN NORMANDIE 


22, Place du Général de Gaulle 
76600 LE HAVRE 
Tél.: 35.43.51.54 


39/41 Rue de l’Oratoire 
14000 CAEN 
Tél.: 31.85.18.77 


31, Boulevard de is 


Tél.: 35.07.6060 


11, rue du Perré 
61220 VIMOUTIERS 
-Tél.: 33.39.16.65 
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Transformez votre 464 en 664+! 
CARTE MÈRE - EXTENSION EPROM de Super Power 


La carte mère s’installe entre l'ordinateur et l'interface disquette (si celle-ci 
est utilisée). Elle peut accueillir jusqu'à 7 EPROMs (mémoire morte pro- 
grammable) de 8 ou 16K chacune. 

Les programmes en EPROM sont instantanément disponibles sur simple 
commande au clavier. La carte mère de construction robuste est d'utili- 
sation simple. Elle est accompagnée d'une notice en français. 


Programmes déjà disponibles en EPROM 
men UTILITAIRE GESTION DE DISQUETTE SUPER POWER BSSSEE 


Ce programme permet l'inspection et la modification des informations 

contenues sur 1 disquette. Un utilitaire essentiel pour récupérer les don- 

nées contenues dans une disquette défaillante. Chaque secteur peut 

être lu et réécrit, toutes les données peuvent être affichées ou impri- 

mées. 

Le programme contient ausi un certain nombre de fonction utiles aux 

programmeurs en langage machine. 

Description : 

- Affichage du contenu du «directory» - édition possible 

- Lecture et écriture d'un secteur de disque - édition possible 

- Lecture des mémoires, possibilité d'édition, de copie et d'impression. 

- Désassemblage code entre adresse donnée, donnant adresse, code 
objet, mnémoniques, ASC II. 


Recherche dans les secteurs fichiers, une chaîne (string) ou une série de 
codes HEX. 


- Formatage, duplication de disque sans CP/M. 
- Conversion HEX-BIN-DECIMAL. 

- Choix de mode d'affichage. 

- Etc. 


: BOITE A OUTILS DE PROGRAMMATION ess 
+ BASIC ETENDU SUPER POWER 
Commandes directes 


Character: création de caractère utilisateur (affiche la ligne DATA) 
Compact : comprime un programme Basic 

Editor : Editeur à trois fenêtres 

Find/replace : cherche et remplace un caractère ou une chaîne 


Medit : HEX éditeur et ASCII 

Picture : aide à la création des UDG 

Soundiab: éditeur d'enveloppe 

Xref : donne toutes les références d'une ligne (GOTO, 
GOSUB...) 

Commandes imprimante 

Cdump : copie haute-résolution 

Echo on: sortie directe sur imprimante 

Echo off : LTRON - sortie TRACE sur imprimante 


Commandes graphiques 


Circle, Fill, Frame, Gcol, Graphic paper, Graphic pen, Mask, 
Turtle... 


Commandes d'écran 


Copychr : caractère double hauteur ou souligné 
Page-on: défilement vertical 

Page-off : passage d'un écran à l'autre 

Commandes fichiers 

Baud : choix de vitesse jusqu'à 4000 Baud 

Info : donne adresse, longueur, adresse d'exécution 
Unprotect: charge un fichier «P» 

etc... : 


SEMAPHORE LOGICIELS 

c.p. 32 - CH-1283 La Plaine (Suisse) Tél. 022/54 11 95 
Distribution & Services 

Avenue du Québec B.P. 209 91944 Les Ulis cedex 

Tél. 6/446 27 80 


MAIL-MERG 


Le traitement de texte des Amstrad avec 
adressage incorporé. 

Fichier de travail porté à 22K sur 
464/664 et 64K sur le 6128. 

Echange de données avec MASTERFILE 
(fichier) et MASTERCALC (tableur). 


Conversion de vos programmes TAS- 
WORD/AMSWORD 464 possible. (Ecri- 
vez-noUus). 

TASWORD, TASPRINT, TASCOPY, SEMEXT 
MF, SEMEXT MC, Les outils sérieux de 
gestion de texte et données de chez 
SEMAPHORE ! 


Demandez notre documentation. 


Prix de lancement : 


FS FF 

Carte mère 145 548 
EPROM utilitaire disquette 145 548 
EPROM boîte à outils 145 548 
Carte mère + 2 EPROM 400 1520 
Echecs disque 65 235 

cassette 56 185 
Tasword 90 345 


Licence SUPER POWER de MICROPOWER 


Distribué en exclusivité par SÉMAPHORE 


” DART” 


modes O - 1 - 2 - Moniteur vert ou couleur 
- boîtier s'intégrant aux Amstrads - compa- 
tible tous Amstrad, lecteurs de disquettes, 
synthétiseur... - boîtes - cercles - lignes - 
aérographe 

gomme - élastique - fill et unfill - 6 sortes et 
largeurs de trait - accès à toutes les couleurs 
- etc. etc. 

Crayon + logiciel graphique 

Aussi 


Tascopy pour sortir vos chefs d'œuvres sur imprimante 
Semdraw 2. L'utilitaire DAD + dessin technique disquette 


OFFRES 
Crayon optique + logiciel + tascopy 


Crayon optique + logiciel + Semdraw 2 et dessin technique 


SÉMAPHORE présente : «DART» crayon 
optique pour Amstrad rapide et précis 
au pixel près ! Le crayon optique qui permet 
de travailler à main levée, directement sur 
l'écran et à vitesse d'écriture normale ! 


Utilise la technologie des fibres optiques 
polymères. 320 x 200 - 64000 pixels - 


132fs475ff 8 


49fs170ff 5m 
70fs 250ff 5 


160fs610ff = 
180fs650ff = 


Je commande les articles ci-dessus et vous envoie la somme de Sfsou 16ff 


pour les frais d'envoi. 


Signaivre SSSR Nom et Prénom SN 


EE 
EE 


Commande téléphonique au 6/446 27 80  Sémaphore logiciels : C.P. 32 - CH-1283 La Plaine Suisse Tél. 022/54 11 95 
Distribution et services : Avenue du Québec - B.P. 209 - 91944 Les Ulis Cédex (France). 


DESCRIPTION 
DU PROGRAMME 


Règles du jeu : 
en cases, ou cellules ; 


l'écran est divisé 


chaque 


Conservez vos cassettes 
en les protégeant. 


Prénom 
Adresse 
Code: Postal 
Ville 
Ci-joint, chèque bancaire ou postal de 


se 
ns mess 


SORACOM 
Le Grand Logis — 10, Avenue du 
Général de Gaulle — 35170 BRUZ 


UE 
AE 


case a 8 voisines. 

La vie apparaît dans une cellule 
ayant 3 (exactement) voisines 
vivantes : une cellule survit si elle 
a 2 ou 3 voisines vivantes. Une 


cellule meurt si elle a moins de 2 


ou plus de 3 voisines vivantes. 
Le programme autorise jusqu'à 
24 lignes de 78 colonnes. 

Pour les limites de l'écran, on a 
le choix entre deux options : soit 
il n’y a pas de lien entre la pre- 
mière et la dernière ligne, et entre 
la première et la dernière colonne, 
soit la première ligne est considé- 
rée comme voisine de la dernière 
et de même la première colonne 
est rendue voisine de la dernière. 
On obtient une bonne compré- 
hension de ce deuxième cas en 
imaginant que le jeu se déroule, 
non pas sur un plan, mais sur un 
tore fermé (chambre à air de bicy- 
clette). 

La partie Basic fait appel à deux 
routines en code objet : 

— la routine &3200 met toutes 


les cellules à l’état mort et affi- 
che la grille initiale ; 

— la routine &3000 réalise les 
fonctions suivantes : 

Calcul de l’état futur d’une cellule 
à partir de l’état actuel de ses 8 
voisines. Le calcul teste le bit O, 
le résultat (1 = vie, O = mort) est 
stocké dans le bit 7 de l’octet 
associé à une cellule. 
Actualisation : après avoir ter- 
miné les calculs, il faut que l’état 
actuel soit remis à jour. Pour cela, 
le bit 7 (état futur) est recopié 
dans le bit O (état actuel). 
Affichage :. pour gagner du 
temps, on n'affiche pas de point 
à l'emplacement des cellules 
mortes, car l'affichage prend plus 
de temps que les calculs. 
Bords : si on a choisi l'option pre- 
mière et dernière lignes (colon- 
nes) voisines, la routine bord 
introduit des lignes (colonnes) fic- 
tives ; ainsi, si on a 36 lignes, on 
ajoute une ligne O et une ligne 
37 ; Oest la copie de la ligne 36, 
et 37 la copie de la ligne 1. 


OCCUPATION MEMOIRE 


Les routines se trouvent de 
&3000 à &3236. L'état des cel- 
lules est stocké de &4101 à 
&5940 (pour 24 lignes et 64 
colonnes). La première ligne 
(avec 64 colonnes) occupe les 
octets de &4101 à &4140. 


Pour conclure, signalons une 
structure intéressante : le ‘’pla- 
neur’”’. Pour des compléments sur 
le jeu de la vie, voir ‘’POUR LA 
SCIENCE”", août 1985. 


10 REM JEU DE LA VIE 

20 REM PARTIE BASIC - S GAZAIX 1985 
J0 REM 
40 REM 


50 KEY DEF 50,0,872,852,150:KEY DEF 62,0 


863, k43,151 


6D KEY 150, "RUN 90"+CHR$(13):KEY 151, "co 


nt"+CHR$(13) 
70 MEMORY &29F0 


80 CLS 

90 INPUT "surface fermee ? o/n * ,0$ 
100 ‘chargement code objet 

110 PRINT® CHARGEMENT DU CODE OBJET : AT 
TENDEZ ":PRINT:PRINT 

120 LOAD ‘vieobjet" 

130 INPUT “NOMBRE DE COLONNES?7",N 

140 INPUT "NOMPRE DE LIGNES ?° ,NL 

150 INPUT “duree d’une generation ,en 5 
7,7 

160 IF o$="n" THEN POKE &3022,0:POKE 830 
23,0:POKE &3024,0 ; 

170 DATA &3010, 83049, &3DAS, 8321 

180 FOR I=1 TO 4:READ V:POKE V,N:NEXT 
190 POKE &3ODB,N+2:POKE &J0E6,N+2 

200 POKE &320C,N+2 

210 RESTORE 220 

220 DATA &300B, 83046, &S0AD, &30B9, &30C7,& 
3218 

230 FOR 1=1 TO 6:READ V:POKE V,NL:NEXT 


240 POKE 43209, NL+2 
250 POKE &JOBE,n:POKE &30C9,n+1:POKE &30 
Dé, &äl4nl:POKE &IDE4, &40+nl 

260 1F n<=40 THEN MODE 1 ELSE MODE 2 
270 BORDER 12 

280 HINDOW #3,1,nt1,1,n1#1 

290 WINDOH 40, 1,40, 25, 25 

300 HINDOW 45, 1,N+1,NL+2,NL+2 

310 MINDOH #4, N+2,N+2, 1,NL+42 

320 FOR i=1 TO nl+2:PRINT #4,CHR$(143);: 


ÿfenetre 3 


org H3000 
ent 5% 
a,3 


bit 7:etat futur----bit O'etat actuel 
ld 


3JEU DEF LA VIE :CODE SOURCE 


4 
œ 
Pr 
u 
a 
[4 
3 
Lu 
€ 
Li] 
v 
œ 
= 
u 
0 
“ 
mn 
LA 
u 
[2 
v 
4 
3 
— 
— 
œ 
u 
œ 
£ 
3 
12 
+“ 
Li 
… 
œ 
— 
[°1 
N 


40 jla 1e ligne occupe les octets k4101 a &4136 
50 jla derniere les octets de k5901 a 85936 


10 
30 


Hisoft GENA3.1 Assembler. Page 
Pass 1 errors: 00 


3000 
3000 
3000 3E03 


NEXT 

330 FOR i=1 TO n+i:PRINT #5,CHR$(143);:N 
EXT 

340 ‘affichage ecran et initialisation 
350 CALL &3200 

360 INK 2,1,2 

370 v$=CHR$(224):p$=".":1$="7" 

380 PRINT #0," Presser D pour conme 
ncer° 

390 ‘saisie de la configuration de depar 
t avec les touches du curseur:shift + cu 
rseur sert a effacer 

400 LOCATE #3,1,1:PRINT #3, "?"s:x=leuzt 


410 PRINT #3,CHR$(B); :IF n<4i THEN PEN 
#3, 2 

420 PRINT #3,1$::PEN #3,1 

430 IF INKEY(O)=0 AND VPOS{#3)€>1 THEN 
PRINT #3, CHR$(B);v$; CHR$(11)5 CHR$(B): 

v$::GOSUB 550:GOSUR 530 :u=u-1 

440 IF INKEY(0)=32 AND VPOS(#3)€>1 THEN 
PRINT #3, CHR$(8);p$3;CHR$(11); CHR$(B); 
p$;:GOSUB 580: GOSUB 530:y=y-1 

450 IF INKEY(2)=D AND VPOS(#3)€NL THE 
N PRINT #3, CHR$(B); v$;CHRS(1D)CHR$(B) 
:V$::GOSUB 550:GO0SUB S30:y=u+1 

460 IF INKEY(2)=32 AND VPOS(#3) €NL THEN 
PRINT #3, CHR$(B);p$s CHR$(10)CHR$(8)CH 
R$(46);:GOSUB 580:GOSUB 530 :y=u+1 


470 IF INKEY(1)=0 AND POS(#J)€N+1 THE 


itext stream select 


h1,#4000 
7,th1) 
z,rep 


call #Hbbb4 
push h1 


1d 

call bords 
call cal 
ret 


290 jmodule d'affichage 


300 aff: 
310 


push bc 
push de 
push h1 


250 
260 
270 
280 
320 
330 


3002 CDB4BB 

3005 210040 
1E00 
1c 
1600 
14 
10F9 

301C C1 
10ED 
CB?E 


3008 
3013 2E00 


3015 

3017 CD2930 
301F CD9D30 
3022 CDB830 
3025 CD4330 


300A 0618 
300€ 

300D cs 
300E 24 
300F 0624 
3011 

3016 2C 
3014 

301D 

3028 C9 
3029 CS 
302A DS 
302B ES 
302C 


bit 
ir 


340 
350 


3030 ES 


302E 280C 
3031 


N PRINT #3, CHR$(B) :v$:v$::GOSUR 550:G05 

UB 590:x=x+1 

480 IF INKEY(1)=32 AND POS(#3)€N+1 THEN 
PRINT #3, CHR$(B):p#$;p$;:G0SUB 5B0:GGSU 
B 530:x=x+1 

490 IF INKEY(B)=0 AND POS(#3)<)2 THEN 
PRINT #3, CHR$(B); v$s CHR$(B)CHRS(B); v$ 
::G0SUB 530:GOSUB 550:x=x-1 

500 IF INKEY(8)=32 AND POS(#3)<>2 THEN 
PRINT #3, CHRS(8);p$; CHR$(B)CHRS(B) ;p#; 
:GO0SUB 580:GOSUB 530:x=x-1 


510 IF INKEY(81)=0 THEN CLS #0: GOTO 610 
520 GOTO 410 

530 FOR i=1 TO 10:NEXT:RETURN 

540 ‘mise a jour de la case memoire cor 
respondant a la cellule traitee 

550 m=&4000+u#&100+x 

560 POKE m,129 

570 RETURN 

580 m=84000+y#&100+x 

590 POKE m,0 

600 RETURN 

610 REM appel du code objet:calculs et a 
ffichage 

620 PRINT #0, "ESC =STOP 
630 ‘’boutle principale 
64D ti=TIME: CALL 83000 
650 IF TIME-t1 € JO0*T THEN GOTO 650 ELS 
E CLS #3 

66D 60TO 640 


C =REPART'; 


5set cursor en hl 


z,setvie 


call Hbb75 
1d a, 224 
ibb5d ecrit chr&(A) 

call HbbSd 

pop hi 
h,H4i 
b,24 
b,36 
Li 

call somme 
3 


call HbbSd 
480 jcal calcule l'etat futur de 1a cellule 


push de 
pop hl 
pop h1 
pop de 
pop bc 
ret 
ld 
1d 
push bc 
id 
1d 


Ds 
3033 CD75BB 

2E01 
304C CD?7830 
304F FEO3 

CA6930 


3036 Ei 
3039 CDSDBB 
Ei 


303C 
3040 CDSDBB 


3032 El 
3037 3EEO 
303D DIi 
303E Ci 
903F C9 
3043 2641 
3045 0618 
3047 C5 
3048 0624 
3044 

3051 
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UTILITAIRES DE 


RECOPIE 
D'ECRAN 


Pascal HIGELIN 


n utilitaire de recopie d'écran est certainement 

l’un des outils les plus demandés lorsqu'il fait 

défaut sur le Basic de l’ordinateur. En voici un qui 

vous semblera complexe, mais qui présente l’avantage 
d’être quasi universel. intégrant un SPOOLER (tampon 

_ permettant à l’ordinateur de travailler, même si l’im- 

primante n’est pas prête), il permet également de redé- 
finir des ‘’trames’’ pour simuler différentes couleurs. 


Ce logiciel rajoute cinq nouvelles 
commandes au Basic. AMS- 
TRAD : 

| COPY : recopie d'écran haute 
résolution ou une partie de celui- 
ci sur imprimante. 

| COLOR : redéfinit la trame d'une 
pseudo-couleur. 

| PRINTER : reconfigure l'inter- 
face imprimante. 

I TEXTE : recopie l'écran ou une 
partie de celui-ci en mode texte 
sur l'imprimante. 

| SPOOLER : redéfinit les paramè- 
tres du spooler. 

Le caractère | correspond à SHIFT 
et(® sur le clavier. 


MISE EN ROUTE 


Pour charger le programme en 
mémoire sans détruire un pro- 
gramme Basic qui s’y trouve déjà, 
faire : CHAIN MERGE ‘’ ”’. Vous 
pouvez également charger le pro- 
gramme par RUN ‘‘ ‘’ mais, dans 
ce cas, un programme Basic déjà 
résident sera détruit. 


UTILISATION 


Reconfiguration de 
l'interface CENTRONICS 


IPRINTER,x,a,b,c,d... y,e,f,g,h... 


x octets y octets 
x : peut prendre les valeurs de O 
à 10 et correspond au nombre de 
codes à envoyer à l'imprimante 


10 et correspond au nombre de 
codes pour faire un retour à la 
ligne sur l'imprimante. 
e,f,g.h.... : y codes de retour à la 
ligne. 

m : peut prendre les valeurs 6 ou 
7, correspond au nombre de 
points verticaux de la tête d’im- 
pression de l'imprimante. 

p : nombre ajouté à chaque code 
graphique avant de l'envoyer à 
l'imprimante (nécessaire sur cer- 
taines imprimantes). 

q : peut prendre les valeurs O ou 
1 : la valeur 1 correspond aux 
imprimantes qui, en mode graphi- 
que, ont le bit de poids faible en 
bas, la valeur O correspond à cel- 
les dont le bit des poids faible est 
en haut. 

Exemple : Imprimante CENTRO- 
NICS 154 en mode graphique 6 
points. 


nombre à rajouter 


bit de poids faible en haut 


IPRINTER,3,&1B,8&25,8&30,1 ni 
TT, 
nombres de points 


pour la mettre en mode graphi- 
que. | 

a,b,c,d,.… : x codes de mise en 
mode graphique. 

y : peut prendre les valeurs O à 


codes de retour chariot 

nombre de codes de retour chariot 

codes de mise en mode graphique 

nombre de codes de mise en mode graphique 


Exemple : 
IDP 560 


IPRINTER,4,&1B,&4B,100,01,1,13,7,0, 


Codes pour une largeur de 100 points. 


Imprimante CITIZEN 


1 
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Recopie d'écran graphique 
ICOPY,a,b,c,d,e,f 


a : doit être compris entre O et 
640, coordonnée graphique de la 
gauche de la fenêtre à imprimer. 
b : doit être compris entre O et 
640, coordonnée graphique de la 
droite de la fenêtre à imprimer. 
c : doit être compris entre O et 
400, coordonnée graphique du 
haut de la fenêtre à imprimer. 
d : doit être compris entre O et 
400, coordonnée graphique du 
bas de la fenêtre à imprimer. 

e : peut prendre les valeurs O ou 1 
O : demi-largeur (320 points 
maxi) 

1 : largeur normale (640 points 
maxi). 
f : peut prendre les valeurs O ou 
1 


0 : hauteur normale (400 points 
maxi). 
1 : double hauteur (800 points 
maxi). 


Exemple : 
ICOPY,0,640,400,0,1,1 
Recopie d'écran tout entier en 
double hauteur. 


Redéfinition 
d'une pseudo-couleur 


Pour pouvoir représenter sur l'im- 
primante les différentes couleurs 
de l'écran, cette instruction per- 
mettra d'associer à chaque 
numéro de couleur de l’écran une 
pseudo-couleur représentée par 
une trame dans une matrice de 
8 x 8. 

ICOLOR,a,b,c,d,e,f,g,h,i 


a : numéro de la pseudo-couleur 
à définir. 


Lignes 100 à 170 


Table des sous-programmes du moniteur utilisé dans le 


programme. 
Lignes 210 à 230 


Branche l'extension du Basic (RSX). 
Lignes 240 à 310 
Recopie des jumpblocks de IMPR et BUSY (IMPR et BUSY 
sont déviés à cause du spooler). 
Lignes 420 à 460 

Table de sauts. 


40 


bà)j 
trame. 


: octets représentant la 


Exemple : 


ICOLOR,0,1,2,4,8,16,32,64,128 


00000001] |: 
0000001 
0000010 
00001000 
00010000 
0010000 
01000000 
10000000 


Dans ce cas, la pseudo-couleur O 
(couleur du fond) sera une 
hâchure. 


Recopie de texte 
a : doit être compris entre 1 et 80 


(mode 2), coordonnée gauche de 
la fenêtre à imprimer. 


b : doit être compris entre 1 et 80 


(mode 2), coordonnée droite de 
la fenêtre à imprimer. 

c : doit être compris entre 1 et 
25, coordonnée du haut de la 
fenêtre à imprimer. 

d : doit être compris entre 1 et 
25, coordonnée du bas de la 
fenêtre à imprimer. 


Exemple : ITEXT,1,40,1,25 
Recopie tout l'écran en mode 
texte sur l'imprimante (mode 1). 
Si un caractère n'est pas 
reconnu, il sera remplacé par un 
espace. 


Reconfiguration 
du spooler 


Le spooler est une mémoire tam- 
pon qui est remplie à la place 
d'envoyer les caractères à l'impri- 


Lignes 470 à 570 
Lignes 590 à 680 


mante. Un second programme 
vide le spooler toutes les 1/50° 
de seconde, donc on n’est plus 
obligé d'attendre l'imprimante. 


ISPOOLER,a,b,c 


a : adresse du début du spooler, 
par défaut : &9C30 

b : adresse de fin du spooler, par 
défaut : &A400 

c : nombre de tentatives de sor- 
tie d'un caractère sur l’impri- 
mante par 1/50+ de seconde. 
Le spooler ne se protège pas lui- 
même : avant de faire, par exem- 
ple, ISPOOLER,&9000,&A400,8 
on fait MEMORY &9000 pour le 
protéger. Si on change de taille 
du spooler, celui-ci est vidé. Le 
spooler sera également utilisé par 
le Basic avec les instructions : 
PRINT #8 et LIST #6. 


REMARQUES GENERALES 


Dans le cas où le nombre de para- 
mètres des instructions est incor- 
rect ou que ces paramètres ne 
sont pas dans la plage indiquée, 
l'instruction sera ignorée. 

Pour modifier les paramètres par 
défaut des différentes instruc- 
tions, vous pouvez sauvegarder 
ure version du programme avec 
les paramètres choisis : ce seront 
les nouveaux paramètres par 
défaut. 

L'AMSTRAD, par sa construc- 
tion, ne peut envoyer que des 
octets ayant le bit 7 à O, donc si 
vous envoyez un code supérieur 
à 128, il lui sera retranché 128, 
ceci est également valable pour 
les codes de contrôle pour pas- 
ser en mode graphique. L'utilisa- 
tion d'une imprimante à mode 
graphique 8 points entraînera que 
la première ou la dernière ligne 
graphique sera vide. 


Table des instructions supplémentaires. 


Cette routine est appelée 50 fois par seconde. Elle tente 


de vider le spooler. 


Lignes 700 à 710 


INSTRUCTION COPY 


Il faut 6 paramètres. 


Lignes 720 à 890 

Récupère les paramètres. 

Lignes 910 à 1020 

Teste la validité des paramètres. 

Lignes 1040 à 1070 

Début de page. 

Lignes 1080 à 1090 

Début de ligne : envoi d’un saut de ligne puis des codes 
de passage en mode graphique. 

Lignes 1100 à 1150 

Initialisation pour un octet. 

Lignes 1160 à 1270 

Teste un point, applique le masque de la couleur. Sile 
point est en-dehors de la fenêtre, il est éteint. 
Lignes 1280 à 1300 

Fait rentrer le nouveau point dans l’octet. 

Lignes 1310 à 1410 

Teste le pas de la fenêtre. 

Lignes 1420 à 1480 

Descend d’un point en simple hauteur, d’un demi-point 
en double hauteur. 

Ligne 1490 

Recommence pour chaque point. 

Lignes 1500 à 1570 

Fait tourner l’octet pour placer les points correctement. 
Lignes 1580 à 1590 

Met l'octet dans le spooler. 

Lignes 1600 à 1660 

Teste la fin de ligne. 

Lignes 1670 à 1750 

Avance de deux points en demi-largeur et d’un point 
en largeur normale. Saut pour l’octet suivant. 
Lignes 1760 à 1970 

Descend d’une ligne. 

Lignes 1880 à 1890 

Début de ligne. 

Lignes 1900 à 1920 

Teste le bas de la fenêtre. 

Ligne 1930 

Recommence une autre ligne. 

Lignes 1950 à 1960 

Saut de ligne, puis rend la main au Basic. 

Lignes 1980 à 2080 

Lit le nombre d’octets à envoyer dans TABLE puis envoie 
les n codes de TABLE. 

Lignes 2100 à 2200 

Lit le nombre d'’octets à envoyer dans TABLE 1 puis 
envoye les n codes de TABLE 1. 

Lignes 2220 à 2280 

Détermine la position de la table de la couleur conte- 
nue dans A. 

Lignes 2290 à 2390 

En fonction de Y et de l'agrandissement vertical, on 
prend l’octet correct parmi les 8. 

Lignes 2540 à 2590 

Sort A sur le spooler. 

Lignes 2610 à 2630 

Correction puis sortie sur le spooler. 


INSTRUCTION COLOR 


Lignes 2650 à 2660 

Il faut 9 paramètres. 

Lignes 2670 à 2730 

Calcule la position dans la table des couleurs en fonc- 
tion du numéro de couleur. 

Lignes 2740 à 2830 

Transfère les 8 octets dans la table des couleurs. 


INSTRUCTION PRINTER 


Lignes 2850 à 2960 
TES la longueur du buffer d’entrée et la position du 
Ut. 


Lignes 2970 à 2980 

Maximum 10 codes de graphiques. 

Lignes 2990 à 3090 

Passe à la rubrique suivante. 

Lignes 3100 à 3110 

Maximum 10 codes de retour à la ligne. 

Lignes 3120 à 3210 

Passe à la rubrique suivante. 

Lignes 3220 à 3250 

6 ou 7 points autorisés. 

Lignes 3260 à 3300 

Teste le nombre de paramètres. 

Lignes 3310 à 3400 

Range les codes de passage en mode graphique dans 
TABLE. 

Lignes 3410 à 3490 

Range le nombre de points de l’imprimante (6 ou 7) et 
le code à ajouter à chaque caractère. 


INSTRUCTION TEXTE 


Lignes 3580 à 3690 

Il faut 4 paramètres. 

Lignes 3600 à 3890 

Teste la validité des paramètres. 

Lignes 3900 à 3930 | 

On commence dans le coin en haut et à gauche. 
Lignes 3940 à 4030 

Teste tous les caractères d’une ligne, si le caractère 
n’est pas reconnu, on met un blanc. 

Lignes 4040 à 4110 

Saut de ligne, on récupère les paramètres pour une 
nouvelle ligne. 


INSTRUCTION SPOOLER 


Lignes 4130 à 4140 

il faut 3 paramètres. 

Lignes 4150 à 4280 

Récupère les adresses de début et fin de spooler et les 
teste. 

Lignes 4290 à 4360 

Range les adresses de début et de fin, vide le spooler 
et range le nombre d'essais effectués par 1/50° de 
seconde pour envoyer un caractère à l’imprimante. 
Lignes 4380 à 4460 

Indique s’il y a de la place dans le spooler. 

Lignes 4480 à 4700 

Range un caractère dans le spooler s’il y a de la place, 
sinon attend qu'il y ait de nouveau de la place. 
Lignes 4720 à 5050 

Routine d'interruption : tente d'envoyer les caractères 
du spooler sur l’imprimante. 

Lignes 5070 à 5080 

Copie des jump blocks de IMPR et BUSY. 

Lignes 5100 à 5130 

Sauts qui remplacent IMPR et BUSY. 

Lignes 5150 à 5340 

Variables. 

Lignes 5360 à 5540 

Table des couleurs. 


Pour faire une copie d’écran avec l’imprimante AMS- 
TRAD DMP1, on a intérêt à utiliser la séquence sui- 
vante : 


GAUCHE, DROITE, HAUT, BAS sont les limites de la fené- 
tre à imprimer. | 

DLARG et DHAUT sont les codes de double hauteur ou 
demi-largeur et peuvent valoir 0 ou 1. 


1 L= (DROITE - GAUCHE + 1)/(2 - DLARG) 


2 ! PRINTER,4,27,75,L \128,LMOD 128,1,1 0,7,0,0 
3 1! COPY,GAUCHE,DROITE,HAUT,BAS,DLARG,DHAUT. 
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Hisoft GENAJ.1 Assembler. Page 1. 3A099E LD  A.(FLAG) 
FEOI œæ 1 
Pass 1 errors: 00 2004 JR  NI.SUITE 
77 
BEFO 100 TEST: {COULEUR DU POINT X=DE.Y=HL DANS À F 
BD2E 110 IMPR: ASORTIE DE À SUR IMPRIMANTE, PIT 7 = O 1808 JR TOURHE 
BD2E 120 EUSY: iTESTE SI L'IMPRIMANTE EST OCCUPEE cs 1240 SUITE: PUSH BC 
BCD! 130 LIK: 3BRANCHEMENT DE L'EXTENSION DU BASIC CDFO2E 1250 CALL TEST 
BB72 140 ROM: {CURSEUR SUR LA LIGNE À CDCE9E 1240 CALL EVAL 
BB6F 150 COLUMN: ÿCURSEUR SUR LA COLONNE À ci 1270 POP BC 
BR6O 160 SCREEN: {CODE CARACTEFE SOUS LE CURSEUR DANS à JA069E 1280 TOURNE: LD A, (BYTE) 
BCD7 170 FRAME: ÿBRANCHE LE SPOOLER 1F 1290 URAP:  RRA 
180 32069E (BYTE) A 
190 49400 2A04SE HL, (Y) 
200 EDSROUE 132 DE. (Y_FIN) 
015094 210 DEBUT: BC. CONTAB 37 
21494 220 HL,BUFFER F 
CDDIRC 230 . CALL LINK ED52 HL.DE 
22ÆED 23 LD HL.BUSY 3805 C.FIN 
11D39D 232 LD DE.EUSY! AH 
010300 233 LD C3 NZ #FF 
EDEO LDIR L, 1X+10) NZ, CONT 
21D69D LD  HL.ZUEY2 M CEXSLL) : Al 
112EPD LD DE,EUSY anepu | 9? (FLAG), 
010300 LD BC,3 LUIX6) HL, (Y) 
520 Loi H, (147) He 
212880 LD HL,IMPR CV DEBIL A, (SIZE _Y) 
LD DEIMPRI L. 1x8) 0 
LD 3 H, (149) ME SUT 
os OU FIND,HL È 
LD H.IMPR2 LEDt#4) OH 
LD DE,IMPR M CEK+S) LOOP 
UD BC.3 CY FINAL A. (SENS) 
LDIR Di 0 
LD HLBLOCK NZ. SAUT 
LD B,210000001 ee e. A8 
LD co = C 
LD DE,INTER AS CN40) B.A 
CALL FRAME (SIZE VIA 21069E HL.BYTE 
RET É 37 1570 LOOP1: 
F 1580 
390 LOCK:  DEFS 9 ln CBIE 1590 
400 BUFFER: DEFS 4 3 10FA 1600 DJNT LOOP1 
410 CONTAB: DEFW NMETAR JAOGTE 1610 SAUT7: LD  A(SYTE) 
C3699A JP COPY HL.DE CDOD9C CALL CARAC 
C313C JP COLOR c” EDS2029€ LD DE.(X) 
c3379C JP PRINTE HL, (Y DER) 2AFC9D LD HU, (X FINI 
C3R39C JP TEXT F 
nd de Hal DE, (Y_FIN) 
AFSO 470 NMETAB:'DEFH *COP* F HL,DE 
09 480 DEFE *Y*+480 ED? Z,SUIVAN 
AJUFACOF 490 DEFM *COLO* DB . C.SUIVAN 
n2 500 DEFE *R°+480 DE 
S05249€ 510 DEFM “PRINTE" . A, (SIZE X) 
2 520 DEFE °R°+480 ie nr 0 
544559 530 DEFN “TEX 2AFE9D HL, (Y DER) D Æ Z,SAUTS 
Dé 540 DEFE “T°+480 ONE (DH 
UE DNS CDA99E 1080 LIGNE: CALL CR 


me cr nd CPA9B 1090 CALL CODES 
ë 3A089€ 1100 OCTET: A, (POINTS) Hisoft GNAJ.1 Assenbler. Page 
s 47 1110 B,A 
4 1120 C,A 
300 1130 A,0 9B6D 1740 INC 
Hisoft GENAS.1 Assenbler. Page è 32099 1140 (FLAG), A 9B6E 1750 SAUT3: LD  (X),DE 
; 32069  115© (BYTE), À 9872 1760 UD H,(Y_ DER) 
be serres 9875 1770 LD (NH 
580 EE 3278 1780 JP  OCTET 
5 590 INTER: PUSH EC at: 9B7B 1790 SUIVAN: LD A, (POINTS) 
D5 600 k Hisoft GENAJ.1 Assenbler. Page 9B7E 1800 LD CA 
& 610 9B7F 1810 LD A,(SIZE Ÿ) 
F5 620 9882 . 1820 œ 0 
CD8R9D 630 Q9AF3 2A049€ 1160 LOOP: LD 9884 1830 JR NZ,SAUTI 
Fi 640 9AFb EDSBO29E 1170 uw 9296 1840 SLA € 


o 
TT 


EG EG GE GEECEEEGEEEGS 
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1850 SAUTI: LD B.0 D.0 
HL, (Y_DEZ) 
DJNZ LOOPS 
| RET HL,DE 
HL,EC B,A 
(Y_DERY,HL PUSH HL 3240 A, CHL) 
HL, (X_DEB) PUSH BC 3250 
202€ O0, CALL IMPR 250 
3A099E A, (FLAG) POP BC 3270 
FEU! 1 POP H 3280 NC 
CAAS9B T, RETOUR RET 3290 AB 
CZE09A LIGE 3300 3 
ADD A,#20 3310 NI 
CDA99B 1980 RETOUR: CALL CR CALL PRINT 3320 HL, (ADDR) 
c9 1990 RET RET 3330 B.(HL) 
2000 oé 3340 B 
21DC9D 20I0CR: LD H,TAME 2680 COLOR: CP 9 11€790 3350 DE, TABLE] 
mr 2020 2690 RET N2 TE 3360 LOOPÉ: A. (HL) 
78 2030 DD&E10 2700 LD L,(IX#18) 12 (DE), A 
2040 ce25 2710 SLA L 23 DEC H 
2050 C25 2720 SLA L 2 DEC H 
2060 cB25 2730 SLA L 13 INC DE 
2070 LOOP?: 2600 2740 LD H.0 10F9 DJNZ LOOPS 
2050 CALL PRINT 110E9E 2750 LD  DE,COULEU 46 LD B,(HL) 
2090 INC H 4 19 2760 ADD HL.DE 04 INC B 
2100 DUNZ LOOP2 DD220C9E 2770 LD (ADDR),IX 11DC9D LD DE,TABLE 
2110 EDSPOC9E 2780 LD DE, (ADDR) TE 3450 LOOP7: LD  A,(HL) 
2120 c2 LD B,8 12 3460 LD (DE),A 
2130 COLES: : LD  A,(DE) 2 3470 DEC H 
2140 LD  (HL),A Lans s 
2150 INC DE HS 
2160 INC DE HE Se 
2170 INC HL Hisoft GŒNA3.1 Assenbler. Page 
2180 ÿ DJNZ BOUCLE 
2190 LOOP3: RET 
CDOS9C 9C8F 28 3480 DEC H 
23 2880 PRINTE: LD L.A 9c90 13 3490 INC DE 
10F9 2890 SLA 9091  10F9 3500 DJNZ LOOP7 
c9 - “l 9093 7 3510 A, CH) 
9C94 32089€ 3520 {POINTS),A 
210E9E : « COULEU à À 9C97 2B 3530 
1600 D,0 Hisoft GENAJ.1 Assembler. Page . 90% 2E 3540 
SF E,A 9c99 7E 3550 
cp23 320€9C 3560 
CE23 QCJA 20 2900 DEC L "3570 
cB2J ‘ QCIB 2 2910 DEC L 3580 
19 9C3C 2600 2920 LD H,0 3590 
QCZE DD220C9€ 2930 LD (CADDR),IX 3600 
9C42 EDSEOCSE 2940 LD DE. (ADDR) 10 
Hisoft GENAI.1 Assenbler. Page 9C47 22009 2960 (ADDR) ,HL __ J630 
QC&A SE 2970 E, (HL) à 3640 CWRAP), À 
9C4B 4F 2980 3450 
9BD8 EDSPO4E 2320 DE, (Y) gc4c 3460 SAUTE: AS#1F 
SEDC 3AOBÆ 2330 A, (SIZE _Y) QC4D (WRAP), À 
9BDF FEU 2340 0 QC4F | 
9RE! 2002 2350 NZ, SAUT2 9c50 
9BE3 CP2E 2360 € gcsi 
9BES 1600 2370 SAUT2: D.0 9c52 
9BE7 2380 A,#7 9c53 
9BE9 2390 € 9055 
9BEA 2400 E.A 9c57 
9BEE HL,DE 9c58 
9BEC A, (HL) 9cs9 
92ED C,A 9C5B 
9BEE DE. (X) 9csC 
9BF2 A, (SIZE _X) 9C5D 
9BF5 0 9CSE 
9EF7 NZ, SAUT4 9C60 
9EF9 E 
9BFE 2490 SAUTé: A,#7 9c62 
SBFD 2500 E 9c63 
9BFE 2510 BA 9C64 


k 
N1 

A, (1X+6) 
1 

c 
(X_DEB),À 
A, (1X+2) 
1 

c 
(Y_DEB),A 
A, UIX+4) 
gi 

NC 
(X_FIN),A 
A, (1X+0) 
2 


SGGCASCGASGOCASCEAS 
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DO 3860 NC 4580 RET 
200% 2670 (Y_FIN).A 450 3 5260 IMPR2: DEFE #C3 

JAFESD  3e00 A, (Y_DEB) 400 IMPRI: SCF 6490 5250 DEFH IMPR3 

4&F 3890 C.A 4610 PUSH AF ; 5260 

JACGE 3500 A, CY_FIN) 4620 PUSH 85 01040000 5270 TALE: DEFB 1,10,C.0,0,0, 
91 3910 C 4430 PUSH DE 5280 0.0.0.0,0 

DB 3920 ms 03122530 5290 TABLEL: DEFE 3,#1B,#25,#30, 
ëF 3930 LD 5300 0,0,0,0.0,0,0 
oc 3940 INC 5310 SP_MAX: DEFW DEBUT 

JAFA9D 3950 LD 5320 SP_MIN: DEFW DEPUT-2000 

47 3960 LD 5330 SP_REM: DEFW DEBUT-2000+1 
JAFCSD 3970 LD 5340 SP VID: DEFW DEPUT-2000 

90 3920 SUE 5350 X DEB: DEFW O 


D8 3990 RET 5360 X_FIN: DEFW O 
47 4000 U 9D6C 36FB 4660 JR  C,SAUTS 5370 Y DEB: DEFW O0 


04 4010 INC QD6E 2AF69D 4670 HL, (SP_REM) 5380 Y FIN: DEFW 0 
ED430C9E 4020 LOPB: LD (ADDR),PC 9071 77 4680 CHL),A 5390 X: 
SAFE9D 4030 LE A,(Y_DEB) 9D72 23 4690 La 5400 Y: 
CD72PR 4040 CALL RO 9D73 22F69D 4700 + (SP_EEM) ,HL 5410 BYTE: 
JAFA9D 4050 LD A.(X_DEB) 9076 EDSRF29D 4710 DE, (5P_MAX) 5420 SENS: 
3D7A 4720 5430 POINTS: 


9D7E 4730 , 
Hisoft GENAS.1 Assenbler. Page ; 907C 4740 340 FLAG: 


SBC HL,DE 5450 SIZE_X: 
gD7E 4750 JR NZ.RETURN 5460 SIZE Y: 


9D80 4760 LD HL.(S? MIN) 
«(SP 470 ADDR: 
SCD F5 4060 LOOP4: PUSH AF 9D83 4770 LD (SP REM),HL lois 


: 5480 
QCFE CDEFEB 4070 CALL. COLUMN À 
à 9086 4780 RETURN: POP HL S490 COULEU: DEFR 70001000 
9001 CDEOË 4080 CALL SCREEN 9D87 4790 POP DE QULEU 
: 5500 DEFB 09100000 
9D04 FE20 4090 cp 32 9088 4800 POP BC id D 
9006 3002 4100 JR  NC,SUITE4 9D29 4810 POP AF A 
9008 3JE20 4110 LD A,32 gDEA 4820 RET … DEFS etes 
DA CDOS9C 4120 SUITE4: CALL PRINT 4830 : DER nee On 
9000 F1 4130 POP 4F JE 5540 DEFE 2700000010 
P 9DEB 0608 4840 VIDE: B,E es Dre 20000060 
SD0E JC 4140 INC À 9DED 2AF69D 4850 LOOP9: HL. (SP_REM) 3560 DEFR 20001000 
900F  10EC 4150 DJNZ LOOP4 9D90 ED5BFB9D 4860 DE, (SP VID) 5570 
gDI1 CDA9E 4160 CALL CR an 4870 Aie 
9014 ED4BOCIE 4170 LD EC, (ADDRI gps 4890 HL.DE 3580 DEF2 21111111 
: 5590 DEFE 2141111111 
se de fee 9097 4890 7 S600 DEFB 21111111 
9019 4190 RET 1 9098 4900 HL, (SP_VID) sito DFE 11111111 
gDA 4209 LD AQ(Y_DEE) 9098 4910 & di UN 
"ni 2 DRE A 909€ 4920 (SP_VIDI,H 5630 DEFB 11111111 
9DIE 4220 LD (Y_DER),A 9D9F EDSPF29D 4930 DE, (SP_MAX “se PT 
9D21 4230 JR  LOOPB JDA 77 4960 k . 
4240 UE 5650 DEFB 11111111 
9023 4250 SPOOL: CP 3 gDAS EDS? HL.DE en FT 
9025 4260 RET NI 9DA7 2813 1, SUITEZ Sk80 
9D26 DD6EU2 4270 LD L.(IX#2) gDA9 HL, (SP VID: Er 
9D29 DD6603 4280 H(IX+3) gDAC A (AL) 5690 
9D2C DDSEU4 4290 E(IX+4) gDAD PUSH RC 
9D2F DD5605 4300 D, (1X45) QDAE CALL BUSYI 


9032 JEAJ A HAS gpPi POP BC Hisoft GENAI.1 Assenbler. Page 11. 
9034 BC gDP2 JR  C.SUITES 
9D35 DS 9DE4 à PUSH BC 
9036 Dr CALL IMPRI FLAG 9EC9 FRAME BCD7 IMPR PD2P 
9037 9DP8  S0ë POP EC IMPRI 9DDO -IMPR2 9DD9 IMPR3 9D64 
9038 9DE9 DJNZ LOGPS INTER 9A7D LIGNE 9AED LINK CDI 
9039 9DPE RET LOOP 9AF3 LOOPI S9B4A LOOP2 9222 
SD3A HL,DE 9D2C 5090 SUITE2: LD HL,(SP_MIN) | Loop3 9BC3 LOOP4 9CFD LO0P5 9C00 
903C El H 9DPF 5100 DEC HL LOOPS 9CED LOOP7 9C8C LOOPB J£FO 
ea : 7Du Sr LD (SPVIDI.HL | Loop? 9D8D NMETAB 9461 OCTET 9AËL 
90SE  EDS3F49D (SPMINI,DE | gpc3 5120 JP LOQP9 POINTS 9E08 PRINT 9C05 PRINTE 9C37 
9042 22F290 (SEMAU.HE | once 5130 SUITE: LD HL,(SP VID) | RETOUR 9BAS RETURN 9D86 ROM  BE72 
9D45 ED53F89D (SP VIDI.CE | opco 5140 DEC H GEI? SAUTI 939 SAUT? ORES 
9049 13 Œ _ | opca 5150 LD (SP VIDI.HL QB&E SAUT 9FE SAUTS 9Dë9 
9D4A EDS53F69D (SP_REM) DE 9DCD 5160 DJNZ LO0F9 SCAD SAUT? 9ES0 SCREEN RP6O 
SDE  DD7EUO A, (1X40) 9DCF 5170 RET 9E07 SIZE X SEUA SIZE_Y 9E0B 
9051 328090 (VIDE+1),A 5180 9D23 SP MAX 9DF2 SP_MIN 9DF4 
9054 C9 9DD0 5190 IMPRI: DEFR HCF.#F2.487 | Gp REM 90FS SP VID 9DF8 SUITE 9205 
9DD3 5200 BUSY1: DEFB #CF,.#1B.468 SUITE? 9DBC SUITES 9DC& SUITE4 9D0A 
SUIVAN 9B7B TABLE 9DDC TABLEL 9DE7 


3590 5230 DEFW RUSYS 


Hisoft GENAJ.1 Assembler. Page 


9268 ES 4bëG PUSH HL 
9D69 CD559D 4650 SAUTS: CALL EUSYS 


HN» AONQE 
> 


AARAAAAA 


errcrs: 00 


ASAGSEEEE 


9055 2AF69D 4500 EUSYJ: HL, (SP_REM) 


9058 EDSEFB9D 4510 DE, (SP_VID) TEST BBFO TEXT 9CB3 TOURNE 920D 
DSC 37 4520 È VIDE 9DEB RAP 9210 X 9E02 
9050 3F 4530 | Ë Se ne ed NDEB 9DFA X FIN O9DFC Y 9ED4 
905€ ED52 4540 H.,DE Hisoft GENAJ 10. VDEB DE YFIN 9E00 

9060 37 4550 

961 C8 4560 ? Table used: 1001 fros 1500 

9062 4570 906 C3 5220 PUSY2: DEFB #C3 Executes: 39424 
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A 
VISMO FAIT PEAU NEUVE 


Afin d'améliorer le service client, M. ZDUNEK 
de la société Vismo de Paris a changé l’agen- 
cement de son magasin. Dans le même 
temps, le second magasin faisant double 
emploi serait fermé. 


AMSTRAD S'AFFICHE 


Grosse campagne d'affichage chez AMS- 
TRAD FRANCE. 2500 panneaux dans 63 vil- 
les dès le 15 octobre. Quelque temps après, 
aux environs du 15 novembre, 13 villes de 
plus de 300 000 habitants se verront affi- 
chées AMSTRAD. 

ll est regrettable que, dans le même temps, 
quelques revendeurs en mal de trésorerie 
attendent avec impatience d'être livrés de 
leurs machines. 


PUBLICITE 


AMSTRAD FRANCE a lancé également une 
grande campagne avec différents supports : 
cela va de l'Express, Science et Vie à toutes 
les revues informatique grand public. 


CPC S'AFFICHE AUSSI 


Pour ce numéro, la direction des Editions 
SORACOM a décidé de mettre en place une 
campagne d'affichage dans différentes gran- 
des villes de France et sur Paris et banlieue. 


CPC AMSTRAD A L'ECOLE 


Si l’école publique fait appel de gré ou de 
force au TO9 de THOMSON, de plus en plus 
d'établissements, particulièrement dans le 
privé, font appel à AMSTRAD. Une manière 
de bien gérer son établissement. Reste à 
savoir si les logiciels éducatifs suivront. 


121 % 


AMSTRAD est devenu le leader incontesté 
du marché des ordinateurs domestiques, fou- 
lant ainsi le créneau solidement détenu par 
Sinclair. 

L'exercice terminé au 30 juin 1985 laisse 
apparaître un bénéfice imposable en hausse 
de 121 %. Cela représente un total de 
20 115 000 livres. Mais le plus intéressant 
est la hausse des ventes à l'étranger. De 11 
millions de livres, elles passent à 73 millions. 
Une belle réussite commerciale au moment 
où MSX sombre. 


MULTIPLAN ET 
MAC PAINT SUR AMSTRAD 


Un Multiplan sur PCW 8256 et 6128 dispo- 
nible. Voilà une nouvelle intéressante pour les 
utilisateurs. Nous vous présenterons plus en 
détail ce logiciel qui, associé à d’autres, per- 
met d'élargir le champ d'action. Reste à 
savoir si Je Multiplan en question a les mêmes 
possibilités que celui du MAC. 

Comme vous pouvez le constater dans ce 
numéro, nous vous présentons une grande 
première : le petit frère du Mac Paint et..., 
ce n'est qu'un début |! 


ACTUALITE 


M. Dominique ROUSSIES d'Angers est le pre- 
mier abonné tiré au sort à recevoir un livre 
de 139 francs. Il y aura un tirage chaque 
mois. 


POLITIQUE DE VENTE NOUVELLE 


De nombreux revendeurs reçurent en octo- 
bre une circulaire de Marion VANNIER, Direc: 
teur Général d'AMSTRAD FRANCE. AMS- 
TRAD FRANCE propose un abonnement nou- 
veautés. Ce système permet de recevoir 5 
exemplaires maximum des softs et périphé- 
riques. Le montant de la commande se situe 
entre 1000 et 2000 francs maximum. 
AMSTRAD propose également un PCW 8256 
en démonstration-vente avec, pour la pre- 
mière fois, une traite au 31/12/85 | 


M. BOUICHET POSE UNE 
QUESTION AUX PROFESSIONNELS 


Possesseur d'un 464, puis d'un 6128, je 
désirerais utiliser le courrier des lecteurs pour 
faire part de quelques réflexions au sujet du 
‘’graphisme‘’ de ces appareils. 

Je pense, en effet, qu'il est temps de faire 
un sort à ces ‘‘Pub‘’ qui vantent les mérites 
et la ‘‘définition’’ de ces appareils. 

— Il est à remarquer que l'écran fait moins 
de 400 points de définition (à quoi servent 
les 640 ?). 

— Qu'en mode texte (80 c., mode 2), le texte 
est presque illisible. 

— Qu'en mode 1, on ne peut disposer que 
de 4 couleurs ! 

— Qu'en mode 0, si on a bien 16 couleurs, 
les traits sont tellement gros qu'inutilisables 
et les matrices énormes. 

Comment appeler tout cela autrement que la 
“misère des couleurs des AMSTRAD ?” 
{sûrement un record). 

Pourtant, les logiciels de jeux sont manifes- 
tement en Mode 2 et avec les 16 couleurs... 
Quel artifice, les programmeurs ‘‘Pro’’ 
emploient-ils pour arriver à ce résultat ? 
Je pense qu'une solution ferait bien des heu- 
reux. 


Qui répondra ? 
S. FAUREZ 
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FACTURATION 
CAISSE DETAIL DE 


OGICYS 


Florence MELLET 


e nouveau logiciel de facturation 

ressemble, à s’y méprendre, au pre- 

mier logiciel de FACTURATION de 
LOGICYS présenté en septembre dernier 
dans CPC n° 3. 
— Par sa présentation d'abord : pochette à 
rabats en plastique dur de couleur bordeaux, 
notice bâtie sur le même schéma, étiquette 
sur la disquette (face A : programme ; face 
B : fichiers). 
— Par sa structure ensuite : gestions de 
fichiers CLIENTS - ARTICLES AVEC STOCK 
- CONSTANTES, saisie et édition de factu- 
res, inventaire, calcul des réapprovisionne- 
ments, Saisie des entrées/sorties de stock, 
clôture et journal des ventes. 
Je pense qu'il n’est pas utile de répéter ici 
les observations faites dans le premier arti- 
cle pour tous les points communs aux deux 
logiciels. Il sera plus simple et plus clair de 
procéder par comparaison entre FACTURA- 
TION (1er logiciel) et CAISSE-DETAIL (logi- 
ciel à l'essai aujourd’hui) ! 


CAPACITE DES FICHIERS 


Facturation  Caisse-détail 
Fichier clients maxi 499 maxi 100 
Fichier articles maxi 1499 maxi 2500 
Fichier constantes taux TVA 3 8 


L'augmentation à 8 taux de TVA dénote le 
souci de contenter les impératifs de toutes 
les professions ou presque. Même chose 
pour le fichier articles. Malheureusement, ces 
améliorations amputent sérieusement :la 
capacité du ficher clients. 


GESTION DU FICHIER CONSTANTES 


Hormis les 8 taux de TVA désormais prévus, 
j'ai noté qu'il y avait plus d'espace disponi- 
ble sur les 5 lignes réservées à la raison 
sociale. Par contre, le choix entre ‘‘facture’” 
ou ‘‘avoir'’ n'existe plus. Reste seulement le 
numéro de facture. 

Apparaissent deux nouvelles zones : 

— Précision : cette zone permet de détermi- 
ner si l’on veut arrondir le prix de vente au 
franc supérieur, aux 10 centimes supérieurs, 
ou ne pas l’arrondir. 

— Texte sur facture : il n’en est pas fait men- 
tion dans la notice, mais deux lignes sont pré- 
vues pour une mention répétitive comme 
‘’Merci, à bientôt’”, par exemple. Ces deux 
lignes s'inscrivent au bas de la facture. 


GESTION DU FICHIER CLIENTS 


Bien qu'il ne comporte plus que 100 clients, 
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il n’y a pas de différence. Seuls les codes 
représentant et qualité n'existent plus. Les 
clients peuvent également être listés sur 
imprimante par numéro de code. 
NOUVEAU : lorsqu'on veut créer une nou- 
velle fiche client et qu’on ne connaît pas le 
dernier numéro utilisé, le programme donne 
le premier numéro libre à la saisie du code 
9999. 

Le numéro de téléphone est prévu pour la 
nouvelle numérotation à 8 chiffres. 


GESTION DU FICHIER ARTICLES 


Le fichier articles a été modifié pour une 
grande partie. 

LE CODE ARTICLE : de 4 numériques, il passe 
à 8 alphanumériques. Cette nouvelle numé- 
rotation permet le listage des articles par 
famille. 

Ce critère de tri peut intervenir sur une sim- 
ple liste des articles en fichier, sur le calcul 
des réapprovisionnements, sur l'édition d'in- 
ventaires chiffrés ou vierges. 
DESIGNATION : 18 alphanumériques. 
PRIX D'ACHAT : il n’est plus saisi directe- 
ment et n'intervient plus dans le calcul du prix 
de vente. Il résulte soit du calcul du prix tarif 
HT moins le taux de remise ou est égal au 
prix tarif HT, soit du prix tarif TTC moins la 
TVA ou du prix tarif TTC moins les taux de 
remise et moins la TVA. 

CODE HT/TTC : O pour prix tarif HT ; 1 pour 
prix tarif TTC. 

PRIX TARIF : c'est le prix d'achat HT ou TTC 
avant déduction des remises. 
COEFFICIENT DE VENTE : il intervient sur le 
prix tarif HT en ajoutant la TVA ou seulement 
sur le prix tarif TTC pour le calcul du prix de 
vente. ‘ 

TAUX DE REMISE : il prévoit deux remises 
cumulées sur le prix tarif. Intervient dans le 
calcul du prix d'achat. 

CODE TVA : il faut saisir l’un des 8 taux défi- 
nis dans le fichier constantes. 

NOUVEAU : introduire l'incidence de TVA sur 
chaque article lors de la création du fichier 


présente un avantage certain. En effet, il . 


n'est plus possible, lors de la saisie des fac- 
tures, de faire des erreurs de TVA puisqu'elle 
est prédéfinie à la création de l’article. 
LES AUTRES PARAMETRES : prix moyen 
pondéré, quantité mini, quantité réappro, 
quantité entrée, quantité sortie sont sans 
changement, excepté : 

— ‘quantité mini’’ qui passe de 99,99 à 
999,99 maximum ; 

— ‘‘quantité réappro’” qui passe de 9999,99 
à 99 999,99 maximum. 

Ce dernier paramètre est utile pour mémori- 


ser en quelque sorte sur l’article en question 
la quantité minimale de réapprovisionnement 
pour un prix d'achat au plus juste (remises 
quantitatives fournisseurs). 

En résumé : les prix d’achat HT et prix de 
vente TTC ne sont pas saisis directement 
mais découlent des calculs suivants : 

— Pour un prix tarif HT : 

PA = Prix Tarif OU PA = Prix Tarif — Remi- 
ses. 

PV = Prix Tarif x Coef. OU PV = Prix Tarif 
+ TVA. 

— Pour un prix tarif TTC : 

PA = Prix Tarif — TVA OÙ PA = Prix Tarif 
— Remises —- TVA. 

PV + Prix Tarif x Coef. OU PV = Prix Tarif. 


GESTION DES FACTURES 


La saisie des factures se fait en relation avec 
les fichiers CLIENTS et ARTICLES. Contrai- 
rement au premier logiciel FACTURATION, 
l'édition sur imprimante se fait après chaque 
saisie de facture. 

Iln’est plus nécessaire de saisir la date à cha- 
que nouvelle facture. On la tappe une fois au 
clavier au commencement du travail ou en 
début de journée, tout de suite après le char- 
gement du programme. 

L'affectation des facteurs à un ou plusieurs 
représentants n'a plus lieu d'être, mais il 


. aurait été utile de la prévoir pour les vendeurs. 


SAISIE DES FACTURES 


Le masque de saisie est complètement 
changé. La colonne Taux de TVA a disparu, 
et pour cause, puisque la TVA est un des 
paramètres de l’article. 

La colonne Remise n'existe plus non plus. On 
ne peut donc plus ajouter les remises par ligne 
d'article. Seule subsiste la remise globale en 
pied de facture. 

Pour les clients qui ne sont pas en fichier, le 
code 9999 s'affiche, mais il n’est pas possi- 
ble de saisir nom et adresse. Les clients 
‘’comptoir’’ resteront anonymes. 


EDITION DES JOURNAUX DES VENTES 


Il est possible de procéder à des clôtures et 
journaux de ventes intermédiaires tout en 
conservant la clôture et le journal des ven- 
tes de fin de mois. Ceci permet d'obtenir le 
CA d’une journée ou d’une semaine sans être 
obligé de faire des cumuls du mois ‘‘à la 
main'”. 

— JOURNAL PERIODIQUE : 1 ligne par fac- 
ture avec les ventilations HT, TVA, DIVERS, 
PORT et REMISE. 


— JOURNAL DE FIN DE MOIS : 1 ligne par 
JOURNEE et par MODE DE REGLEMENT, 
avec les mêmes ventilations que le journal 
périodique. 

£n fin de journal, et dans les deux cas, les 
totaux sont classés par catégorie : HT, TVA, 
TTC, règlements. 


Editions SORACOM 
SARL capital 50.000F 

10 Avenue du Gal de Gaulle 
35170 PRUZ - Tel. 99.52.98.11 


COPIE DES FICHIERS 


Autre élément nouveau sur ce logiciel. Il 
comprend un programme intégré pour la sau- 
vegarde des fichiers. Ainsi, les copies seront 
facilement tenues à jour, car il n’est plus 
nécessaire de faire appel à un autre logiciel. 


UTILITAIRES ET DIVERS 


Cette option au menu général est aussi nou- 


velle. 

Elle permet : 

— le tri des articles par référence et par 
famille, 

— l'annulation d’une facture sur le journal 
des ventes. 


CONCLUSION 


Ce logiciel fait partie de la série LOGICYS 
‘logiciels professionnels sur AMSTRAD”. 
Les différentes améliorations que j'ai relevées 
démontrent bien une certaine volonté de 
séduire les PME/PMI. Je constate d’ailleurs, 
et en toute modestie, que nos suggestions 
ont trouvé, pour certaines, une application 
dans ce logiciel ; à savoir : plus de 4 taux de 
TVA, l'édition immédiate des factures, le tri 
des articles, les journaux intermédiaires pour 
les plus importants. 

Malgré tout, je reste sur ma faim. Je pense 
qu'il est trop complet pour une tenue de 
caisse et pas assez performant pour une fac- 
turation. 

Je sais que la place mémoire limite bien des 
élans et contraint aux choix difficiles. 

lci, la gestion des stocks, telle qu'elle est 
conçue, avec incidence sur le fichier articles, 
prend beaucoup de place mémoire. Une ges- 
tion, réduite au minimum, à savoir unique- 
ment quantitative, permettrait peut-être 
d'augmenter les possibilités du fichier clients, 
avec tri alphabétique ou non, par code pos- 
tal et cumul du CA, TTC ou HT par client, par 
période (mois, trimestre, etc.). Dans ce cas, 
la gestion des stocks chiffrée pourrait faire 
l'objet d’un autre logiciel avec calcul du rou- 
lement des articles, calcul des marges glo- 
bales, etc. 

Mais, ce ne sont que des idées amenées par 
l’utilisation de différents logiciels qui, tous et 
toujours, se rejoignent à un moment, malgré 
les petits plus de chacun. 

Îl'est temps de conclure : ce logiciel est mieux 
réussi que le premier, mais ne peut pas le 
remplacer. |! se substituera parfaitement et 
avantageusement à une caisse enregistreuse 
sophistiquée et coûteuse. 


CCP Rennes 794,17 V 


FAUREZ Sulvio 


10 Av. Gal de Gaulle 


335170 ERUZ 


Ech: COMPTANT 
Ticket : 23 


#x FACTURE *%+% 


JOUEZ AVEC AMSTRAD 
100* 

MIEUX PROGR/AMSTR 
DISCO1 

CPC DISC Noli 

ROO& 

REVUE CPC No4 


Livraison a parution 


1003 
APPRENEZ ELECTRON 


Mode de Reglement : 


AU CHOIX 


23.10.85 
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A°°° avoir décrit l'interface 
permettant de relier un fond 
de panier, apte à recevoir plu- 
sieurs réalisations, à l'AMS- 
TRAD, nous commençons au- 
jourd’hui la description de la pre- 
mière réalisation à relier au CPC. 
Pour répondre au souhait d’un 
grand nombre de lecteurs, nous 
commencerons par une interface 
permettant de réaliser des liai- 
sons série ; cette interface offrira 
deux connecteurs de sortie, un 
au format correspondant à la 
norme RS 232, l'autre sur 
connecteur DIN compatible avec 
le connecteur Minitel. 

Pour la réalisation de cette inter- 
face, nous avons choisi le circuit 
INTEL 8251 qui est une interface 
programmable de transmission 
série. Ce circuit peut travailler en 
mode synchrone et en mode 
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asynchrone. 

Il convertit, sous forme de série, 
les données que lui fournit le 
microprocesseur sous forme 
parallèle. Il peut simultanément 
recevoir des signaux série et les 
transformer en format parallèle 
pour les envoyer au microproces- 
seur. Le 8251 dialogue avec le 
microprocesseur et lui indique 
quand il peut accepter un nou- 
veau caractère à transmettre ou 
quand il a reçu un caractère 
complet pour l'unité centrale. 
Les principaux signaux échangés 
avec le microprocesseur sont : 
RESET : un niveau haut sur cet 
entrée le met en attente d’un mot 
de commande. 

WR : Un niveau bas sur cette 
entrée provoque une écriture 
dans le 8251 de la part du micro- 
processeur. 

RD : Un niveau bas sur cette 
entrée informe le 8251 que le 
microprocesseur lit une donnée 
ou un mot d'état. 

C/D : (control-data) informe le 
8251 que l'octet présenté sur le 
bus de donnée est soit un octet 
de donnée, soit un mot de 
commande ou un mot d'état. 
CS : (chip select) un niveau bas 


sur cette entrée sélectionne le 
8251. 


La figure 1 donne les différentes 
configurations possibles pour ces 
broches. 


Le 8251 possède ensuite un cer- 
tain nombre d’entrées-sorties 
permettant de le connecter à un 
modem ou à un terminal. 

On trouve : 

DRS : (data set ready) C’est une 
entrée qui peut être testée au tra- 
vers du mot d'état. Elle permet de 
vérifier l’état du modem. 

DTR : (data terminal ready) cette 
sortie vers le modem est position- 
née par le bit correspondant dans 
le mot de commande. 

RTS : (request to send) cette sor- 
tie est aussi positionnée par le bit. 
correspondant dans le mot de 
commande. 

CTS : (clear to send) cette entrée 
permet au 8251 de fournir les 
données série lorsque le bit TXEN. 
du mot de commande a été posi- 
tionné. 

TXRDY : (transmitter ready) cette 
sortie informe le microprocesseur 
que la partie émission du 8251 
est prête à recevoir une donnée. 
TXE : (transmitter empty) cette 
sortie est au niveau haut lorsque 
le 8251 n'a pas de donnée à 
transmettre. 

TXC : (transmitter clock) horloge 
d'émission. En mode synchrone 
elle est égale à la vitesse de trans- 
mission, en mode asynchrone, 
elle est un multiple de la vitesse 
de transmission. 

RXRDY : (receiver ready) cette 
sortie informe le microprocesseur 
que le 8251 a reçu un octet et est 
prêt à le lui fournir. 

RXC : (receiver clock) horloge de 
réception, sa fréquence est égale 


8251 — bus de données 


bus de données — 8251 

mot d'état — bus de données 
bus de données — reg. commande 
bus données — état flottant 


Figure 1 


à la vitesse de transmission en 
mode synchrone et est égale à un 
multiple de cette vitesse en mode 
asynchrone. 

SYNDET : (sync detect) est uti- 
lisé en mode synchrone seule- 
ment. 


Dans notre montage, le 8251 est 
implanté aux adresses FBE4H et 
FBESH, les données sont en 
FBE4H et les mots de commande 
et d'état en FBES5H. 


PROGRAMMATION DU 8251 


Avant tout opération de transmis- 
sion, le 8251 doit être initialisé 
par un ensemble de mots de 
commande fourni par le micro- 
processeur ; cette initialisation 
doit suivre une opération de 
reset. 

Les mots de commande sont de 
deux types : 

— sélection de mode : elle suit 
impérativement une opération de 
reset, 

— instruction de commande : les 
mots de commande peuvent être 
émis à n'importe quel moment. 


INSTRUCTION DE 
SELECTION DE MODE 


Le 8251 peut être utilisé pour des 
transmissions de type synchrone 
ou asynchrone ; dans un premier 
temps, nous allons nous intéres- 
ser seulement au mode asynch- 
rone. 

Au caractère fourni par le micro- 
processeur, le 8251 rajoutera 
automatiquement un bit start et 
le nombre de bits stop précisé 
lors de la sélection de mode. Il 
insère aussi un bit de parité avant 
les bits de stop et le caractère 
peut alors être émis en mode 
série sur la sortie TXD ; les bits 
sortent sur le flanc descendant de 
TXC à une vitesse égale à 1,1/ 
16,1/64 fois la fréquence TXC, 
comme précisé dans la sélection 
de mode. 

Le format du mot de sélection de 
mode est donné à la figure 2. 


Après l’envoi d’une sélection de 
mode; il est possible d'envoyer 
un mot de commande, son for- 
mat est donné à la figure 3. 


donne le nombre de bits stop insérés. 

S2 S1 

O O invalide 

O 1 1bit 

1 O 11/2 bit 

1 1 2bits 

donne la génération de parité 1 = paire, O =impaire. 
valide ou non la parité 1 =validée, O =invalidée. 
donne la longueur des caractères transmis. 
L2 L1 

O O 5bits 

O0 1 6bits 

1 O 7 bits 

1 1 8bits 

donne le facteur de multiplication de la vitesse 
de transmission. 

B2 B1 

O O mode synchrone 

O 1 1X 

1 O 16X 

1 1 64X 


Figure 2 


Les bits DSR, SYNDET, TXE, RXRDY, TXRDY ont la même défi- 
nition que les broches du 8251 de même nom. 


Est le drapeau d'indication d'erreur de parité. 
Est le drapeau d'erreur de recouvrement, un 
caractère n'a pas été lu par le CPU alors qu’un 
nouveau est arrivé. 

Est le drapeau d'erreur de format, un bit de stop 
valide n’a pas été détecté à la fin d’un caractère. 


Figure 3 


Le microprocessuer peut connaî- 
tre à tout instant l’état du 8251 
en venant lire le mot d'état ; le 
format du mot d'état est donné 
à la figure 4. 


ANALYSE DU SCHEMA 


Nous retrouvons le 8251 sur 
lequel arrivent les signaux sui- 
vants venant de l'AMSTRAD : les 
8 bits de données, les signaux 
d'écriture et lecture WR et RD, le 
bit d'adresse A0 et le signal de 
chip select (CS8251) venant du 
décodeur d'adresse. Le bit.AO est 
relié à la broche C/D ; en se repor- 
tant à la figure 1, nous voyons 
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Enter hunt mode. Un niveau 1 autorise la recherche 
d’un caractère de synchro. 

Reset interne. Un niveau haut met le 8251 en attente 
d'un mot de commande. 

Request to send, force la broche RTS à zéro. 


Error reset, remise à zéro de toutes les erreurs. 
Send break character 

1 : force TXD à zéro 

0 : opération normale 

Validation de réception (1 = validée, O0 =invalidée). 
Data terminal ready, un niveau haut force la sortie DTR 


à zéro. 


Validation de transmission (1 = validé, O =invalidé). 


Figure 4 
ES | 


que lorsqu'il sera à O, le CPU 
échangera des données avec le 
8251. 

Quand il sera à 1, le CPU échangera 
des commandes ou un mot d'état. 
Sur le 8251, nous trouvons aussi les 
différents signaux nécessaires à la 
liaison série ; nous utiliserons RXD 
qui est l'entrée des données série, 
TXD qui est la sortie des données 
série et les signaux vus plus haut : 
RTS, CTS, DTR, DSR. Nous travail- 
lerons en mode asynchrone et en 
général avec une vitesse identique à 


l'émission et à la réception, aussi 
nous avons relié RXC et TXC. L’hor- 
loge de transmission nous sera four- 
nie par un timer. Nous avons choisi 
un timer bien connu qui est le 8253 
de INTEL. Ce circuit est alimenté par 
une horloge à 1 MHz obtenue en 
divisant par 4 le 4 MHz du CPC à 
l’aide de deux demis LS 74. Le choix 
d’un timer nous permettra d’avoir 
toutes les fréquences désirées par 
programmation ; nous verrons, lors- 
que nous vous proposerons des 
exemples de programmation, que 
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numéro, lorsque nous parlerons de la 
programmation de l'interface, nous 
dirons quelques mots des timers. Le 
choix du 8253 nous permet de nous 
réserver deux timers pour d’autres 
applications. 

Le décodeur d'adresses est consti- 
tué d’un 74 LS 11 et d’un 74 LS 
138, ce qui nous donne la table des 
adresses suivantes : 


OFBE3H mot de mode du 8253 
OFBE4H données du 8251 
OFBE5H mot de commande et d'état 
du 8251. 

La figure 5 donne le schéma de l’in- 
terface ; dans le prochain numéro, 
vous trouverez le film pour le circuit 
imprimé ainsi que des exemples de 
programmes et une application par- 


Figure 5 


CoNnNEc TEUR 
RS 232 


CoNAECTEUR 
Du. 


UTILITAI 


PAS 


e programme aurait pu être 

écrit en assembleur sous 
CP/M, il est écrit en TURBO PAS- 
CAL afin de donner un exemple 
simple de programme PASCAL. 
La particularité de ce programme 
est de faire appel aux procédures 
et aux fonctions prédéfinies BIOS 
de TURBO PASCAL. 


Nous l'avons appelé SECDISC 
car il permet de lire n’importe quel 
secteur du disque, d’en modifier 
le contenu et de le réécrire. Le 
secteur de disque considéré n’est 
pas le secteur physique mais le 
secteur au sens enregistrement 


Denis 
. BOURQUIN 


de 128 octets sous CP/M ; nous 
aurons donc pour notre utilitaire 
36 secteurs par piste, numérotés 
de O à 35 et les numéros de piste 
iront de O à 39. Tout ceci du fait 
de l'utilisation des points d’en- 
trées standard du BIOS sous 
CP/M. 

La procédure:BIOS utilise deux 
paramètres de type entier : le pre- 


mier donne le numéro de la fonc- 


tion du BIOS désirée, le deuxième 
correspond à ce qui sera chargé 
dans les registres BC avant l’ap- 
pel de la procédure. Nous profi- 
terons de ce programme pour 
ouvrir une parenthèse sur CP/M 


AL 


et son BIOS. 

Le système CP/ M est constitué 
de trois modules : 

— le CCP (Consol command pro- 
cess) qui est le module du proces- 
seur de commande console, c'est 
l'interface homme-machine ; 

— le BDOS (Basic disk operating 
system) qui est le système de 
gestion de base des fichiers du 
disque ; 

— le BIOS (Basic input output 
system) qui est le système des 
entrées-sorties de base. 


Le BDOS et le CCP constituent le 
noyau du système et sont four- 
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nis par DIGITAL RESEARCH et 
sont indépendants de l’environ- 
nement. Par contre, le BIOS est 
écrit par le constructeur de 
l'AMSTRAD et contient l’ensem- 
ble des programmes d’entrées- 
sorties (drivers) spécifiques à 
l'AMSTRAD. 

L'accès aux primitives du BDOS 
se fait par un appel à l'adresse 
0005H, le numéro de la primitive 
étant dans le registre C. L'accès 
aux primitives du BIOS se fait par 
un tableau des vecteurs de bran- 
chement situé à la base du BIOS. 
Il suffit de regarder le contenu de 
l'adresse 0001 pour retrouver 
l'adresse du BIOS, et ce contenu 
est l’adresse de BIOS +3. Pour 
AMSTRAD, le BIOS commence à 
l'adresse ADOOH. Le tableau en 
début du BIOS contient 17 vec- 
teurs de branchements dont voici 
les principaux : 

BIOS +9 : JMP CONIN lecture 
d'un caractère au clavier. 

BIOS + 12 : JMP CONOUT envoi 


progras SECDISC; 


(# ce prograsse perset de lire et de modifier un secteur de 128 octets 


d'un caractère à l'écran. 

BIOS + 15 : JMP LIST envoi d’un 
caractère à l'imprimante. 

BIOS + 24 : JMP HOME position- 
nement sur la piste O du disque. 
BIOS + 27 : JMP SELDSK sélec- 
tion d’un disque. 

BIOS = 30 : JMP SETTRKinitiali- 
sation du numéro de piste. 
BIOS + 33 : JMP SETSEC initia- 
lise le numéro du secteur. 
BIOS + 36 : JMP SETDMA initia- 
lise l'adresse du buffer disque. 
BIOS + 39 : JMP READ lecture 
d'un secteur disque. 

BIOS + 42 : JMP WRITE écriture 
d'un secteur. 


L'utilisation de ces primitives se 
fait en TURBO avec la procédure 
BIOS :; les numéros des fonctions 
utilisés dans cet exemple sont : 

8 : séléction du disque. 

9 : sélection de la piste. 
10 : sélection du secteur. 
11 :initialise l'adresse d’un buf- 
fer pour les données. 


elbl:=upcaselelb]); 
for i:=0 to 15 do 
if elb}=t{i] then a:=i#l6; 


sous CP/X, le secteur considerer correspond à l'enregistrement CP/M#) end; 


(# exesple d'utilisation: lecture de la piste 2 qui est le directory 
et recuperation d'un fichier deleter par resise de 00 en debut du 


descripteur a la place de ES#) 


type 
hexstr=string(4); 
nhex=stringl2]; 


b:=b#1; 


elbJ:=upcaselelb1); 
for i:=0 to 15 do 


12 : lecture du secteur considéré. 
13 : écriture du secteur consi- 
déré. 


Dans ce programme, le contenu 
du secteur est visualisé en hexa- 
décimal et en ASCII. A la ques- 
tion numéro de l’octet à modifier, 
il faut répondre par le numéro en 
décimal, l’octet est alors affiché 
dans la zone commentaire. En 
effet, dans l'exemple, nous utili- 
sons la possibilité de multifené- 
trage de l’AMSTRAD ; il y a deux 
zones d'affichage, la zone de dia- 
logue et la zone des contenus du 
disque. De nombreuses améliora- 
tions peuvent être apportées à ce 
programme pour le rendre plus 
agréable d'emploi, mais nous 
vous laissons le soin de l’amélio- 
rer pour vous permettre de vous 
familiariser avec le langage Pas- 
cal. A 


if elbJ=tli] then a:=ati; 


conv:=a; 
end; 


procedure window{x1,y1,x2,y2:integer); 


begin 


const 


write(826,chrix1-11,chr(x2-1) ,chriy1-1) ,chr(y2-1)); 


. + array(0..15)0of charz"0123456789ABCDEF" ; end; 
function hex(nusber: integeribytes: integer):hexstr; procedure mindou0; 
var ‘ begin 
d : integer; mindou(1,1,80,24); 
N ‘ hexstr; ‘ end; 
begin h(0):=chribytestbytes); var 
for d:=bytestbytes dounto 1 do begin 
htd]:=t{nusber and 15]; parasetre:integer; 
nusber.=nusber shr 4; buffer: array [1..128] of byte; 
end; a,b:integer; 
hex:=h; | cchar; 
end; esstringl2]; 


fonction: integer; 


function conviesnhex):integer$ 


procedure affichage; 
var begin 


i,b,asinteger; windou(1,1,80,18); 
begin : cirscri 
a:=05b:=0; for a:=0 to-7 do 
if lengthle)=2 then begin 
begin for bi] to 16 do writelhex(buffer[a#16#b],1)," *)3 
b:=1; ; for b:=l to 16 do 


begin 

if bufferlak16+b1($20 then writel'.°) 

else if bufferlat16tb])$7e then writel”.') 
else writelchribuffer(atiétb])); 

end; 

uriteln; 

end; 

end; 


begin 
ce='Ll'; 
cirscr; 
while cz'L' do 
begin 
window{1,19,80,24); 
cirscri 
write ('disque 0/1 ? *’)ireadiniparasetre); 
fonction:=8; 
bios{fonction,parasetre); 
writel"nusero de piste ? ")ireadin(parasetre); 
tonction:=9; 
bios(fonction,parametre); 
writel’nusero de secteur ? ‘)ireadiniparametre); 
fonction:=10; 
bios(fonction,parasetre); 
parasetre:=addr buffer[1]); 
fonction:=11; 
bios(fonction,parasetre); 
fonction:=12;a:=bios{fonction, parametre); 
affichage; 
windon(1,19,80,24); 
cirscri 
uritel'desirez-vous modifier ce secteur? ‘); 
readin (clic:supcase(c}; 
while c="0" do 
begin 
writel'nusero de 1 octet a modifier’); 
readln (a); 


writel’ancienne valeur: ‘,hexibuffer[a},1),° nouvelle valeur: ’); 


readin le); 
bufterla]:=convie); 
affichage; 
mindou(1,19,80,24)icirscri 
writel'autre modification: ’); 
readin (c); 
c'=upcase(c); 
end; 
cirscri 
writel'E: pour ecrire ce secteur, L:pour lire un nouveau, '); 
writel' autre lettre pour fin’); 
readin(c); 
c'upcaselc}); 
if c='E" then 
begin 
fonction:=13; 
bios(fonction,parasetre); 
cirscri 
write (l'desirez-vous lire un autre secteur ‘}; 
readin(c)ic:=upcase(c); 
if c='0" then c:=’L’; 
end; 
end; 
window; 
cirscri 


end. 
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our trier les données stockées 

dans un fichier, il est néces- 
saire de charger celles-ci en 
mémoire (dans un tableau), d'en 
faire le tri suivant un ou plusieurs 
critères, puis de réenregistrer le 
tableau dans le fichier. 


Il existe plusieurs méthodes de tri 

(par sélection, par échange, 

dichotomique, etc.), leur effica- 

cité reposant sur la longueur et la 

complexité du progamme:et sur- 

tout sur le temps d'exécution. 

Les moins efficaces nécessitent 

un temps proportionnel au carré 

du nombre d'éléments à trier 

(NxN), les plus rapides à 

N#log(N). 

Nous allons décrire, dans ce 

numéro, trois méthodes dont 

vous pourrez comparer les perfor- 

mances : 

— le tri par sélection, 

— le tri par dichotomie, 

— le tri par la méthode de Shell- 
Metzner. 

Dans le prochain numéro, nous 

étudierons : 

— le tri par arborescence, 

— le tri rapide (Quick-Sort) 


D'après les résultats sur les 3 
échantillons de nos exemples, le 
tri par. dichotomie dont on dit 
grand bien, n'est pas d'une 
grande efficacité lorsque le fichier 
s'agrandit et il est alors préféra- 
ble de choisir la méthode de 
Shell-Metzner. 
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150 


30 


300 nombre 
d'articles 


TRI PAR SELECTION 


Dans cette méthode, on prend un 
élément de référence. On le 
compare successivement à cha- 
cun de ses suivants. Si l'élément 
de référence est plus petit, c'est 
bon. Sinon, on l'échange avec le 
suivant concerné. | 


Arrivé au dernier suivant, l’élé- 
ment de référence contient le 
plus petit élément du tableau. On 
prend alors son suivant comme 
élément de référence, et ce 
jusqu'au dernier. 
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Cette méthode, facile à program- 
mer, ne peut être utilisée que 
pour de petits fichiers. 


TRI PAR DICHOTOMIE 


Le principe est le suivant : 

On considère que N éléments 
sont rangés dans l'ordre voulu 
(croissant pour l'exemple). On 
souhaite insérer un nouvel élé- 
ment. 

Pour cela, nous prenons l'élément 
du milieu et nous le comparons 
à l'élément nouveau. Si le nouvel 
élément est plus petit, sa place 
sera dans le sous-ensemble gau- 
che, sinon dans le sous-ensemble 
droit. On recommence l’algo- 
rithme jusqu’à ce que la gamme 
couverte par le sous-ensemble 
corresponde à 1. Nous connais- 
sons alors la place à laquelle il 
faut ranger le nouvel élément. 


10 REM TRI PAR SELECTION 
_ 20 REM DU TABLEAU D$ 
30 FOR I=i TO M-1 
AD FOR J=1+1 TO M 


Nous devrons alors décaler tous 
les éléments qui suivent d’une 
position et ranger dans la place 
libérée le nouvel élément. 


LT fe 1) 
1 L/4 L/8 L/2 L. 


nouvel 
élément 


TRI PAR LA METHODE 
DE SHELL-METZNER 


L'ensemble des données est suc- 
cessivement décomposé en 
sous-ensembles de plus en plus 
petits (divisé par deux à chaque 
itération). Un élément d’un sous- 
ensemble est alors comparé à 
son correspondant du sous- 
ensemble suivant, avec échange, 
s'il y a lieu et, dans ce cas, on 
remonte au sous-ensemble pré- 
cédent pour remise en ordre 
éventuelle et ainsi de suite 
jusqu’au premier sous-ensemble. 
Le travail est terminé lorsque le 
sous-ensemble ne comporte plus 
qu'un élément. 

Par cette méthode, le n° élément 
d’un sous-ensemble est toujours 
inférieur n° élément du sous- 
ensemble suivant. 


2 DR PUR PCOMEHINE) 
AZ) DONC 
ALAIN MY) 

D'OODOON no 


Pour utiliser cet algorithme pour 
faire un tri, il suffit de ranger les 
deux premiers éléments. On 
insère ensuite chacun des élé- 
ments de la suite en appliquant 
la procédure décrite. 

Cette méthode est évidemment 
plus efficace que la précédente, 
mais elle reste largement insuffi- 
sante lorsque le fichier dépasse 
une centaine d'articles. 


Exemple : 


Départ 31 25 17 38 56 16 22 30 
———_—_—_—_—_—_—_—_—_—_——— —_——_—__— ——————"/J 


impasse { 31 16 17 20 56 25 22 36 
2° passe [ 31 22 + 
22 31 

Ÿ 16 20 25 38 
R. 2° passe 

3° passe 16 17 20 22 25 31 38 656 
Le tri par cette méthode est effi- 
cace et le programme, écrit en 
Basic, prend peu de place. Pour 
un tableau de 300 éléments, la 
méthode de Shell-Metzner est 6 
fois plus rapide que la méthode 
par dichotomie | 


10 REM TRI PAR SHELL-METZNER 
20 REM DU TABLEAU D$ 

30 P=M 

40 P=INT(P/2) 

50 IF P<1 THEN RETURN 


50 1F D$(J)<D$(1) THEN AA$=D$(J):D$(J)=D 


MENU HIT) 

LAXMIHINONNUN 1) 
DOC HIMNNO 
MIMIMTMTONNON 


SUDSLDIEMS 
60 NEXT 


P 10 REM TRI PAR DICHOTOMIE 
REM DU TABLEAU D$ 
} > D$(2) THEN AA$=D$(2):D$(2) 


90 G=R:C=1 


110 IF C=1 THEN R=R+1 
120 AA$=D$(N) 
130 FOR I=N TO 1 STEP -1 


150 D$(D)=D$(I-1):NEXT 1 
160 NEXT N 
170 RETURN | 


EN un 1 


100 Z=D-6:1F 231 THEN GOTO 60 


140 IF R=I THEN D$(1)=AA$:60T0 160 


60 DEB=1:FIN=M-P 
70 R=DEB 
80 C=R+P:IF D$(R)<=D$(C) GOTO 100 
* AAS=DS CR) :D$(R)=D$(C) :D$(C)=AA$:R=R-P 
:1F R>0 60TO 80 
100 DEB-DEB+1:IF DEB>FIN THEN GOTO 40 EL 
SE GOTO 70 
110 RETURN 


HTML) AZ) AZ PAZ) (2) 
HAN X4XD4X)AXT) 
MINE INIHIIN 
IMIMINMAMINEN 
MIMIHIMININ 

RTE 


AYAYA YA TIATIAVI 
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RÉES 


9 MODE 1:MEMORY &7FFF 


EAU“ CNHR 


10 FOR f=5:2768 TO 22802 

20 READ a:FOKE'#f.a 

20 NEXT + | | 

40 CALL %8000:FRINT'"'Entrez CALL &800B:RUN ? °nom°°" 


50 NEW 

100 DATA 35,41,128,6,129,17,29,128,195,229,188,233, 
35.128,17,950,0,1,50,0, 195,225,188,23,35,128, 195,23 
&, 188,205, 24, 187, 195,2, 187 


MOUVEMENT RALENTI 


KL DEL TICKER : enlève CALL &800B  enclenche le 
par Warren Smith (c) Sémaphore RALENTI dela,  RALENTI 
Logiciels. liste d'événe-  CALL &8017 annule le RALENTI. 
ments, ceci 


N'avez-vous jamais souhaité pou- 
voir créer un moment'de pause 
dans l'exécution d'un programme 
afin d'en analyser le’ développe- 
ment, les mouvement ou tout sim- 
plement pour aller prendre un café 
si un jeu ne possède pas de pause ? 
MOUVEMENT RALENTI utilise 
une des nombreuses routines 
magiques de la ROM de l'Amstrad 
pour intervenir sur le déroulement 
d'un programme. L'horloge interne 
de l'Amstrad envoie une interrup- 
tion toutes les x/secondes. Le pro- 
gramme proposé ici, utilise des 
routines qui permettent d'intro- 
duire un petit programme en 
assembleur, dans MOUVEMENT 
RALENTI ce programme attend 
que l'on presse une touche. Ces 
routines permettent en outre de 
décider tout les combien d'inter- 
rupts le petit programme sera 
appelé, ici environ toutes les deux 
secondes. 

Les routines utilisées par Ralenti 
sont publiées dans le. manuel 
d'exploitation de l'Amstrad. Ces 
routines sont : 


KL INIT EVENT: déclare 
RALENTI 
comme étant 
un programme 
d'interruption 
met RALENTI 
sur la liste des 
événements en 
cours, cette 
routine est 
appelée après 
chargement de 
registres par 
CALL & 800B 
dans RALENTI. 


KL ADD TICKER : 


veut dire que &:::::::: 2 tis triste 
RALENTI est ji: 
mis en sus- À 
pens, cette rou- 
tine est appelée 
après  charge- 
ment de regis- 
tres par CALL & 
8017 dans 
RALENTI. 


Lorsque le microprocesseur reçoit 
un interrupt, il arrête le programme 
en cours et exécute les routines se 
trouvant sur la liste d'événements. 

RALENTI qui attend la pression 

d'une touche fait partie de cette 

liste. La fréquence des appels à 

RALENTI peut être modifiée 

comme suit : 

- Une fois le programme tapé et i 
sauvé, chargez-le avec LOAD au ù 
lieu de RUN puis éditez les DATA ü , 
en y changeant les deux valeurs AL 
50 par deux autres (elles doivent 
rester semblables) entre 25 et 
255. Sauvez et exécutez cette 
version du programme. 


; Ti 
an Das 


LUS 
"H 


cn 


LL 


"# 
Pour utiliser MOUVEMENT: 
RALENTI, tapez le programme et 
sauvez-le sur une cassette ou dis- ! 
quette avec le nom RALENTI. 
Exécutez RUN''RALENTI. ÿ 
Entrez ce que l'écran vous 
demande puis exécutez RUN «nom 
du programme à charger» ENTER. 
Chaque fois que le chargement 
s'arrête, il faut taper sur une tou- 
che pour le relancer. C'est l'effet du 
programme qui se manifeste déjà. 
Dans un programme dont vous 
pouvez interrompre l'exécution, 
(non protégé) vous pouvez encien- 
cher RALENTI à volonté : 


H © 


Il existe, je l’ai rencontré dans 
son antre, au fin fond de la cam- 
pagne genevoise, à La Plaine. 

Un coin de cambrousse perdu 
dans le vignoble tout au fond du 
canton. Un antre de baba-cool, 


tentures, pénombre, vieilles éta- : 


gères débordant d'instruments 
bizarres. 

Une mine de baba-cool, cheveux 
qu'il vient tout juste de couper, 
barbe poivre et sel, des shorts et 
des sandales, une vague tunique. 
Aucun doute. Mais ce baba-là est 
de l'espèce des «computer 
freak». Aussi rare dans nos 
contrées qu'elle abonde sur les 
rivages de Californie. 


Qu'est-ce qui a bien pu pousser 
Jean-Pierre Cardinaux sur la 
pente glissante de la micro-infor- 
matique ? Lui, écolo de sensibi- 
lité, parfait produit des années 
soixantes et ex-attaché aux affai- 
res aborigènes en Australie. 


C'est une expérience pédagogi- 
que qui va lui inoculer le virus. II 
est question de tester les capaci- 
tés de l'ordinateur dans le sys- 
tème éducatif. A l’époque, on ne 
parle pas d'initiation obligatoire. 
Pour savoir de quoi il parle, Jean- 
Pierre Cardinaux achète un Spec- 
trum. Rapidement, il y prend 
goût et noue des contacts dans le 
milieu fertile des «computer 
freaks» britanniques et français. II 
se crée des réseaux d'amitiés, 
une communication nourrie s’ins- 
talle. Bientôt, on s'échange des 
logiciels. Plus exactement, dans 
un premier temps, Jean-Pierre 
adapte en français les petites 
merveilles concoctées par les 
anglophones. 

Il faut bientôt fonder une société, 
Sémaphore Logiciels, pour offi- 
cialiser tout ça. Mais les princi- 
pes restent les mêmes : convivia- 
lité d’abord. La plupart des rap- 
ports se déroulent sur un mode de 
troc et d'amitié. On échange des 
services plus que des sous, ce 
que bien des distributeurs au sens 
commercial «traditionnel» ont eu 
de la peine à comprendre, plus, 
accepter. 


Sémaphore et son fondateur, 
n'ont pas de pareil pour dégotter 
le meilleur rapport qualité/prix. 
Alors pensez que quand l’Ams- 


m (ET M 


trad sort, ils sont sur les rangs. Le 
QL. un temps courtisé, est rangé 
sur un rayon, et dorénavant, les 
CPC d'AMSTRAD deviennent 
leur cheval de bataille. 

La passion de la micro, qui anime 
Jean-Pierre Cardinaux, le pousse 
à découvrir sans cesse, et à adap- 
ter les logiciels les plus pratiques, 
les accessoires miraculeux, les 
interfaces indispensables. Et 
lorsqu'ils n'existent pas, il les 
invente. Lui ou quelques uns de 
ses copains, ou les jeunes qui 
viennent pianoter sur 
ses micros. 


Un service expert. 
Lorsque vous achetez votre appa- 
reil dans une boutique, vous trou- 
vez au mieux un vendeur compé- 
tent, au pire un bateleur de super- 
marché qui sait en gros faire la dif- 
férence entre une machine à laver 
et un téléviseur. Mais de là à savoir 
pourquoi votre machine à écrire 
EP44 qui sert d'imprimante ne 
peut, malgré son port RS232, se 
brancher sur le micro de vos rêves, 
équipé lui, d'une sortie parallèle. 
il y a un monde. Et inutile de lui 
demander d'adapter votre logiciel à 
vos besoins particuliers. 

Or, ces combines impossibles, ces 
tours de force de débrouillardise et 
de génie informatique, Jean-Pierre 
Cardinaux en est coutumier. A 
l'aide d'une interface développée 
par un ami anglais, d'une broche 
standard et d'un point de soudure, 
il branchera votre imprimante sur 
l'ordinateur. Alors que tous les 
vendeurs de la place, et même de 
France, n'avaient qu'une réponse à 
la bouche : «changez de matériel». 
Oui, mais le branchement ce n'est 
pas tout. Encore faut-il les faire 
tourner ensemble, mais ici aussi, 
c'est semble-t-il un jeu d'enfant 
d'introduire dans son traitement de 
texte, les instructions ad hoc et 
l'imprimante se conformera aux 
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moindres désirs exprimés par votre 
ordinateur. 


La CAO sur AMSTRAD 


Qu'il s'agisse de crayons optiques, 


de logiciels de CAO (mais oui, tour- 
nant sur AMSTRAD, et étonnant 
de définitions avec ça), de fichiers, 
de graphismes, ou de jeux de 
réflexion, Sémaphore pourrait bien 
avoir de quoi vous brancher... 
Reste que ce n'est 
pas toujours 


facile de suivre l'évolution du mar- 
ché, ses brusques accélérations, et 
ses changements de machines. A 
chaque fois, il faut reconfigurer les 
programmes. Et le côté folklo de 
l'organisation de Sémaphore se 
paie parfois au niveau des délais. 
mais on garde le sourire. 
Aujourd'hui, l'échange n'est plus à 
sens unique. Non seulement de 
Genève, partent vers la France un 
certains nombre de produits tra- 
duits de la langue de Shaekes- 
peare, mais certains logiciels du 
crû, s’en vont à la conquête de Lon- 
dres. Ceci tout simplement, sans 
tapage. 

Bien utilisés, un simple Spectrum, 
ou un Amstrad peuvent faire des 
choses étonnantes. C'est un des 
drames de l'informatique de 
l'avoir, non pas oublié, mais de 
manquer de Jean-Pierre Cardinaux 
pour montrer la voie. Hormis dans 
certaines régions privilégiées, 


comme la Californie ou la Grande- 


Denis BOURQUIN 


A? avoir parlé du rôle de 
l'assembleur, de la syntaxe, 
des pseudo-instructions, nous 
allons nous intéresser aux ins- 
tructions du Z80. Dans le premier 
numéro, nous avons donné une 
description du Z80 ; rappelons 
que les principaux constituants 
d'un microprocesseur sont l'unité 
arithmétique et logique (UAL) qui 
sera chargée d'effectuer les opé- 
rations et les registres qui sont 
des mémoires internes au micro- 
processeur. 


A partir de ces deux blocs, nous 
pourrons déduire déjà deux grou- 
pes d'instructions, les- instruc- 
tions de chargement et de trans- 
fert, et les instructions arithmé- 
tiques et logiques. Nous ajoute- 
rons à cela un groupe d'instruc- 
tions de branchement et de saut, 
un groupe d'instructions pour les 
entrées-sorties, Un groupe pour 
les manipulations de blocs de 
données et un groupe pour les 
contrôles du processeur. Dans ce 
numéro, nous ne nous intéresse- 
rons qu'aux instructions de trans- 
fert. L'UAL du Z80 est une unité 
arithmétique qui traite des don- 
nées codées sur 8 bits, donc la 
plupart des registres de ce micro- 
processeur sont des registres 8 
bits. Il peut, malgré tout, manipu- 
ler des données 16 bits grâce à 
des registres 16 bits et aussi 
grâce à la possibilité de regrou- 
per par paires ces registres 8 bits. 
Nous allons donc trouver les opé- 
rations de transfert s’effectuant 
sur des données 8 bits et des 
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@ INITIATION 
A L'ASSEMBLEUR 


d 


opérations de transfert de don- 
nées 16 bits. 

Le mnémonique du code opéra- 
tion commun à toutes les instruc- 
tions de chargement est : LD. Le 
format d’une instruction de char- 
gement est le suivant : 


LD DESTINATION, SOURCE 


La destination sera un registre du 
Z80, une case mémoire ou une 
valeur immédiate. La source sera 
un registre, une case mémoire ou 
une valeur immédiate. Notons 
que dans une instruction opérant 
entre une source et une destina- 
tion, la destination figure avant la 
source. 

Avant de parler des différents 
types d’adressage rencontrés 
dans les instructions de charge- 
ment, il est peut être bon d’ou- 
vrir une parenthèse sur les 
notions d’adressage. 

Dans notre AMSTRAD, les don- 
nées seront ou dans un registre 
du microprocesseur, ou dans une 
case mémoire. Pour accéder à 
une donnée dans un registre, 
nous appelerons le registre par la 
lettre ou les lettres le représen- 
tant, par exemple : LD B,A trans- 
fère le contenu du registre À dans 
le registre B, c'est ce que l'on 
appelle l’adressage registre. Dans 
ce cas, pour le microprocesseur, 
l'adresse du registre considéré 
est contenue dans le code opé- 
ration. Pour accéder à une don- 
néedans une case mémoire, le 
Z80 de l'AMSTRAD fournit sur le 
bus d'adresse l'adresse de cette 
case. Cette adresse pourra être 


fournie directement dans le pro- 
gramme, elle suit alors le code 
opération, c'est l’adressage 
étendu. En utilisant un assem- 
bleur, nous écrirons, par exem- 
ple : LD (TOTO),A : ce qui provo- 
quera le transfert du contenu du 
registre À dans la case mémoire 
appelée TOTO ; cette case aura 
été au préalable réservée par une 
des pseudo-instructions vues pré- 
2 ENS par exemple avec 
EN. 


ORG 1000H 
TOTO: DB () 


Dans cette exemple, TOTO est 
une case mémoire qui est un 
octet et a pour adresse 1000H. 
L'adresse d’une case mémoire 
pourra aussi ne pas figurer direc- 
tement dans le programme, mais 
elle pourra être déduite du 
contenu d'un registre (les adres- 
ses sont codées sur 16 bits et 
donc les registres considérées 
pour les adresses seront des 
registres 16 bits), lorsqu'une 
case mémoire est adressée à tra- 
vers un registre, nous avons 
l’adressage indirect par registre ; 
il est possible aussi d'ajouter au 
contenu de certains registres un 
déplacement supplémentaire, 
l'adresse est alors le contenu du 
registre plus ce déplacement qui 
figure derrière le code opération, 
c'est l’adressage indexé. 

Pour les instrucitons de charge- 
ment, nous allons trouver les dif- 
férents types d'’adressages sui- 
vants : 


L'ADRESSAGE IMMEDIAT 


Chaque registre du Z80 peut être 
chargé avec une valeur numéri- 
que. Exemple : LD À,10 charge 
la valeur 10 dans le registre A. 
LD B,OFEH charge la valeur hexa- 
décimale OFEH dans le registre B. 
L'assembleur codera cette ins- 
truction de la manière suivante : 


valeur immédiate 


Voici un exemple de codage tel 
qu'il apparaîtra sur un listing 
après assemblage : 


code opération 


3E 10 LD A,10H 
06 01 LD B,10 
26 00 LD H,0 
L'ADRESSAGE 


IMMEDIAT ETENDU 


Nous avons vu que les registres 
peuvent être regroupés par deux 
pour former un registre 16 bits ; 
cette paire de registres peut être 
chargée avec une valeur immé- 
diate en une seule instruction : 
exemple LD BC,1024. Le regis- 
tre B contiendra les poids forts de 
cette valeur, soit 4, et le registre 
C les 8 bits de poids faibles, soit 
0 car 1024 = 400H. Le codage de 
cette instruction est le suivant : 


partie basse partie haute 
— 0 


valeur immédiate 


1er octet 2° octet 


3° octet 


Remarquons que le Z80 stocke 
les données 16 bits en inversant 
l'octet de poids faible et l’octet 
de poids fort. 


L'ADRESSAGE 
PAR REGISTRE 


Il'est possible de charger un quel- 
conque des registres du Z80 avec 
un autre registre. Exemple 

LB B,C. Cette instruction trans- 
fère le contenu du registre C dans 
le registre B. Les codes opération 
des instructions de transfert de 
registre à registre tiennent sur un 
octet, sauf pour deux registres 
particuliers du Z80, les registres 
let R que nous verrons plus tard. 


L'ADRESSAGE ETENDU 


Ce mode d'adressage peut aussi 
être appelé adressage direct. 
Dans ce cas, l’un des opérandes 
est une case mémoire spécifiée 
directement par son adresse, 
l’autre opérande ne peut être que 
le registre A. 

Exemple : LD A,(4000A). Cette 
instruction provoque le charge- 
ment du registre À avec le con- 
tenu de l’octet d'adresse 4000H 
; Si, par exemple, en 4000H, 
nous avons 10 avant l'exécution 
de cette’ instruction, après son 
exécution le registre À contiendra 
10. Bien sûr, la case mémoire 
d'adresse 4000H contient tou- 
jours 10 après l'opération. 
Autre exemple : LD (4000H),A. 
Inversement, ici, c’est le contenu 
du registre A qui sera transféré 
dans la case d'adresse 4000H. 
Le codage de cette instruction est 
le suivant : 


code 
opération 


partie basse partie haute 
D. 
adresse de la case mémoire 


1er octet 2° octet 3° octet 


Exemple de listing : 


32 00 40 LD (4000H),A 
3A 00 40 LD A,(4000H) 
L'ADRESSAGE 


INDIRECT PAR REGISTRE 


Dans ce type d’adressage, une 
paire de registres 16 bits se 
comporte comme pointeur 
d'adresse de la mémoire. 
Exemple : LD A,{HL). Cette ins- 
truction effectue le chargement 
du registre À avec le contenu de 
la case mémoire dont l’adresse 
est dans la paire de registres HL. 
La notation entre parenthèses 
indique que le contenu des regis- 
tres HL doit être utilisé comme 
pointeur sur l'emplacement 
mémoire, il en était de même 
dans l'exemple précédent où 
4000H pointait un emplacement 
mémoire : LD (4000H),A. 
Exemple : 

LD HL,4000 H 

LD A,(HL) 

Ces deux instructions ont pour 
effet de prendre le contenu de la 


case mémoire d'adresse 4000H 
et de le mettre dans le registre A. 
Les paires de registres HL, BC, 
DE peuvent être utilisées pour les 
instructions de chargement utili- 
sant ce mode d'’adressage et 
ayant le registre À comme 
deuxième opérande. Lorsque le 
deuxième opérande sera un quel- 
conque des autres registres 8 
bits, seule la paire de registres HL 
peut être utilisée. Ces instruc- 
tions sont codées sur un seul 
octet. 


L'ADRESSAGE INDEXE 


Dans ce type d'adressage, l’un 
des opérandes est une case 
mémoire pointée par le contenu 
d'un des registres 16 bits d’index 
auquel il faut ajouter un déplace- 
ment codé dans le troisième octet 
de l'instruction. Les registres 
d’index sont IX et IY. Le dépla- 
cement est un nombre signé en 
arithmétique en complément à 
deux. La notation pour cet opé- 
rande est : (IX+d) ou (IY +d). 
Exemple : LD A,(IX+10). On 
prend le contenu du registre d'in- 
dex IX, on y ajoute le déplace- 
ment 10, le résultat est l’adresse 
de la case mémoire dont le 
contenu sera transféré dans le 
registre A. Ces instructions sont 
codées sur trois octets, deux 
pour le code opération et un pour 
le déplacement. 

Nous venons de voir les opéra- 
tions de chargement s’effectuant 
sur des données 8 bits, nous y 
avons ajouté une opération de 
chargement sur 16 bits d’une 
valeur immédiate pour faciliter la 
compréhension des exemples. 
Voyons maintenant les opéra- 
tions de chargement de données 
16 bits en général. Nous retrou- 
vons les mêmes types d’adres- 
sage. 


| L'ADRESSAGE IMMEDIAT 


Les paires de registres BC, DE, 
HL peuvent être chargées avec 
une valeur 16 bits ainsi que les 
registres 16 bits du Z80 : SP, IX, 
lY. 


Exemple : 

LD HL,4000H 
LD SP,0B800H 
LD 1X,10 
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L'ADRESSAGE ETENDU 


Deux cases mémoires adjacentes 
peuvent être chargées avec une 
valeur 16 bits provenant d’une 
paire de registres ou d’un regis- 
tre 16 bits. 

Exemple : 

LD (4000H),HL 

LD (3000H),1X 

Après l'exécution de la première 
instruction, la case mémoire 
d'adresse 4000H contiendra l'oc- 
tet de poids faible, soit le contenu 


du registre L, et la case mémoire 
d'adresse 4001H contiendra l’oc- 
tet de poids fort, soit le contenu 
du registre H. 

Inversement, nous pourrons 
charger une paire de registres ou 
un registre 16 bits avec le 
contenu de deux cases mémoires 
adjacentes. 


L'ADRESSAGE REGISTRE 


Seul le registre 16 bits SP peut 
être chargé par un autre registre 


16 bits qui ne peut être que le IX, 
IY ou la paire HL. 

Exemple : 

LD SP,IX 

LD SP,IY 

LD SP,HL 

Nous ne parlerons pas, dans ce 
numéro, de l’adressage indirect 
par registre pour des données 16 
bits, car seul le registre SP sert 
dans ce type d'instruction qui, de 
plus, n'utilise pas le mnémonique 
LD ; nous les verrons lorsque 
nous aborderons la notion de pile. 


“bises À" ‘mms 


Épue majorité des pos- 

sesseurs d'AMSTRAD ne 
connaît pas le langage machine 
{ou l’assembleur). Or, certains de 
ces programmes publiés sont 
vraiment alléchants ; mais 
comment les entrer au clavier ? 
et sans rien comprendre à cette 
technique ? 


Nous avons donc créé un pro- 
gramme en Basic qui se chargera 
de tout, très rapidement, et en 
vous mettant à l'abri des erreurs. 
Pour résumer, vous lancez notre 
programme Basic, puis vous 
entrez au clavier le contenu 
d'UNE SEULE des colonnes du 
listing en assembleur. Une page 
en assembleur est donc beau- 
coup plus vite ‘’recopiée”” au cla- 
Vier qu'une page de Basic !... La 
frappe terminée, le programme se 
charge de la syntaxe pour la sau- 
vegarde sur cassette ou dis- 
quette. Répétons encore que 
notre programme n'est pas un 
‘’Assembleur'’ mais plutôt un 
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LANGAGE / 
MACHINE ET 


Michel ARCHAMBAULT 


‘’Entreur’’ de listings, conçu pour 
ceux qui ignorent le langage 
machine, qui continueront à 
l'ignorer, mais qui veulent profi- 
ter de ce genre de programme 
même sans rien y comprendre. 
Toutefois, afin de ne pas ‘‘taper 
idiot’”, il est essentiel de possé- 
der ces quelques notions super- 
ficielles : 


QU'EST-CE UN 
PROGRAMME EN 
LANGAGE MACHINE ? 


C'est une suite continue de nom- 
bres, de O à 255, qui ont été 
logés quelque part dans la 
mémoire. Par exemple de 
l'adresse 32901 à l'adresse 
32984 : sa longueur est donc de 
84 octets et son ‘‘’Adresse 
départ'’ est 32901. Pour lancer 
ce programme, ce n’est pas RUN, 
mais CALL 32901. OK ? 
Supposons que cette série de 84 
nombres commence par 195, 6, 
152, etc. Il faudait pour les loger 
en RAM faire : 


POKE 32901,1Y2:PUKE 32902, 
6G:POKE 32903,152, etc. Fasti- 
dieux, non ? Rassurez-vous, 
notre programme demande la 
fameuse adresse de départ, puis 
vous n’entrez que les nombres 
(ou valeurs) à ‘’poker’’ en RAM ; 
il se charge de l’ordre POKE à 
l'adresse à chaque fois augmen- 
tée de 1. Super facile. Et ce 
jusqu'à la fin du listing. Votre rou- 
tine est en place, même après un 
NEW, elle attend d'être appelée 
par le CALL adresse départ ; tout 
ira alors très vite ; environ 50 fois 
plus rapide que le Basic. 

À quoi correspondent ces nom- 
bres entrés ? Certains sont des 
codes de commande pour le 
microprocesseur Z80 de l’AMS- 
TRAD, très souvent suivis par 
des paramètres qu'il exige (des 
adresses, des nombres ; comme 
pour les fonctions Basic). 


LE LISTING 
EN ASSEMBLEUR 


Celui qui a conçu le programme 


en question n’a pas entré à la 
queue-leu-leu cette suite de 
codes et de paramètres ; ce serait 
trop difficile pour se rappeler le 
numéro de code de chaque fonc- 
tion. Il s'est servi d'un pro- 
gramme utilitaire appelé un 
‘’Assembleur’’ où il entre au cla- 
vier le mot (en lettres) qui sont les 
initiales de chaque fonction. 
Exemples : LD, ADD, JP, JR, EX, 
etc., suivis de ses paramètres 
numériques (comme en Basic). 
C'est l’Assembleur qui traduit ces 
‘’MNEMONIQUES"’’" en leurs 
codes machine respectifs, sur- 
veille la syntaxe et met tout ces 
nombres dans le bon ordre. Mais, 
c'est aussi ce même programme 
Assembleur qui en fait le listing 
sur imprimante, celui-là même qui 
est reproduit photographique- 
ment sur la page de la revue. Et 
c'est là que ça se gâte un peu... 
En effet, chaque Assembleur a 
une présentation de listing qui lui 
est propre, et à nous de nous y 
retrouver. Heureusement, ce 
n'est pas difficile : 


D'abord, sachez que les valeurs 
entrées sont TOUJOURS en 
hexadécimal, et notre série de 
tout à l'heure 195,6,152... est en 
fait sous la forme C3,06,98,... 
toujours DEUX caractères (pas 
gênant). De gauche à droite, nous 
trouvons généralement les colon- 
nes suivantes : 

1) Les adresses mémoire. La plu- 
part du temps en hexadécimal, 
sur deux octets, donc 4 caractè- 
res. Seule la première (départ) 
nous intéresse. 

2) Les valeurs à entrer. C'est la 
nôtre ! Souvent, il y a 1, 2, 3 ou 
4 octets à la file. Exemple pour 
CD7DBC , il faudra entrer séparé- 
ment CD puis 7D puis BC. Onles 
appelle généralement les 
‘’CODES OBJETS". 

3) Ce qu'a tapé le programmeur, 
des lettres (mnémoniques) et des 
valeurs en hexa, on s’en moque. 
4) Des commentaires (des REM), 
on s’en moque également. 


Voyons maintenant quelques 
variantes de présentation de lis- 
tings. 

— À gauche, on peut trouver une 
numérotation des lignes du lis- 
ting. Sans intérêt. 


— Une ‘‘préface’”’ qui définit 
l'adresse départ, l'adresse d'exé- 
cution (généralement, c’est la 
même) et des noms de baptême 
de sub-routines avec leurs adres- 
ses. On s’en moque. 

— Une colonne des adresses tra- 
duites en décimal (en plus de 
l'hexadécimal). C'est rare. 


Votre unique travail est d’identi- 
fier la colonne adresse (en notant 
la première) et la colonne don- 
nées (ou. valeurs). C'est tout, 
maintenant, on passe au Basic. 


LE PROGRAMME 
MACHPOKE 


Pourquoi est-il si long pour un 
‘’POKAGE”” aussi simple ? Pour 
éliminer toutes erreurs d’étourde- 
rie lors de la frappe. Elles sont 
faciles et seraient fatales et très 
difficiles à localiser ensuite. La 
moindre erreur provoquera un 
plantage brutal du système, 
après le CALL, et pas de ‘‘Syntax 
Error in &982B''. De quoi 
disposons-nous ? 

— D'un écran de saisie super 
clair et sans équivoque, 

— de la possibilité de lister à 
l'écran ou sur imprimante ce que 
vous avez déjà entré, pour véri- 
fication, 

— de la possibilité de corriger vos 
erreurs, 

— de la sauvegarde sur cassettte 
ou disquette de votre saisie, 
même si elle n’est pas terminée 
ni vérifiée, 

— du chargement de la saisie 
(LOAD) pour suite ou correction. 
— et enfin, après l'avoir sauve- 
gardé, de pouvoir essayer le pro- 
gramme par CALL. 


Confort + sécurités = fiabilité. 


Il n'y a pas de danger de loger par 
POKE des valeurs erronées en 
mémoire, pourvu que vous ne 
lanciez pas par CALL. Toutefois, 
nous avons prévu le cas où l'em- 
placement de ce programme 
machine dans la mémoire gêne- 
rait le Basic : adresse départ trop 
basse qui viendrait dans le Basic, 
ou adresse finale trop haute qui 
irait écraser les variables utilisées 
par le Basic, ou pire encore, dans 
la zone mémoire de l'écran. D'où 


un deuxième programme baptisé 
MACHDIM. Rassurez-vous, il 
sera vite fait : c’est MACHPOKE 
avec seulement quelques petites 
modifications (voir liste). 


LE PROGRAMME 
MACHDIM 


identique à MACHPOKE, sauf 
que les valeurs entrées ne sont- 
pas POKEES mais provisoirement 
mises au tableau DIM. Un autre 
tableau DIM recueille, lui, les 
adresses correspondantes. 

La sauvegarde fournit donc un 
“fichier ASCII”, rechargeable par 
l'option LOAD. Il y a quand même 
une option CALL pour l'essayer 
(après une prudente sauve- 
garde...). 

Que faire de ce programme 
machine enregistré en ASCII ? Il 
faut le transformer ensuite en 
fichier linéaire, c’est le rôle d’un 
tout petit programme Basic. 


LE PROGRAMME 
POKEDIM 


Il tient très peu de place en 
mémoire. Dans un premier 
temps, il lit le fichier ASCII enre- 
gistré par MACHDIM, et le POKE 
en RAM. Il vous prie de noter par 
écrit son nom, son adresse départ 
et sa longueur. Enfin, il vous pro- 
pose de l'enregistrer en binaire 
sous un autre nom (prudent). 
Vous pouvez alors le tester par 
CALL. 

Ces programmes Basic ne font 
appel à aucune astuce spéciale 
ou fonction peu usitée, que du 
classique. Et comme nous 
publions la légende de nos varia- 
bles, vous devez vous y retrou- 
ver facilement. 


LE MODE D'EMPLOI 


C'est plutôt une présentation, car 
toutes les options figurent à 
l'écran. De plus, toute frappe non 
valable est refusée et signalée par 
un bip sonore, le PRINT CHR$(7). 
Toute première phase : Entrée de 
l'adresse départ, en hexadécimal 
ou en décimal. Vous pouvez, par 
exemple, indifféremment taper 
38912 ou &9800. Après le ‘’&'", 
pas d'espace et obligatoirement 
quatre caractères. Sitôt après une 
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passe à l'écran de saisie en qua- 
tre WINDOW, très coloré (on 
vous gâte.. ). Moitié gauche = 
saisie, moitié droite =les interven- 
tions. 

La partie saisie est en trois colon- 
nes : adresse en décimal, sa tra- 
duction en hexadécimal et les 
valeurs à entrer, le curseur vous 
y attend. Rappelons que c'est le 
programme qui affiche l'adresse 
en cours : pas vous. Ces trois 
colonnes sont légendées en haut 
de l’écran. 

La partie options est en trois 
zones. En haut, on rappelle la 
fameuse adresse départ. Au 
milieu, les légendes des lettres 
(en majuscules) pour chaque type 
d'intervention, E pour erreur, V 
pour Visionner, S pour Save, etc., 
plus un rappel vous signalant que 
vous êtes dans MACHPOKE ou 


dans MACHDIM. La partie infé- 
rieure pour l'instant est vide, 
c’est la zone réponse aux ques- 
tions, suite aux interventions. 
Exemple : au lieu d'entrer la 
valeur suivante dans le tableau de 
saisie, vous avez tapé E et 
ENTER : dans cette zone appa- 
raît : ‘Erreur : Adresse en déci- 
mal ?”’. 

La page de saisie comprend vingt 
lignes (scrolling). De temps à 
autre, vérifiez qu'un oubli n’a pas 
provoqué un décalage adresse- 
valeur. 

Les valeurs sont obligatoirement 
en DEUX caractères hexa (et en 
majuscules) ; ne tapez pas le 
""&’", c'est le Basic qui le met. 

Si vous n’entrez qu’un seul carac- 
tère, le programme consulte sil 
RE en use | 

MACHPOKE 


est dans la liste des caractères 
d'interventions. Si ce n’est pas le 
cas, bip sonore et recommencez. 
Il ne peut pas faire une erreur en 
comptant ses adresses, il vérifie 
tout. 

En ‘’vision’”, il va lister votre sai- 
sie à partir de l’adresse que vous 
lui avez indiquée. Il présente 20 
lignes et s'arrête (pas comme 
LIST en Basic...). La zone ques- 
tion vous présente alors trois 
options : ‘’S'’ pour Suite, ‘’E’’ 
pour Erreur décélée, ou ‘‘F’’ pour 
Fin de vision, et retour à la saisie 
ou autre option. 

Les options SAVE et LOAD vous 
demandent le nom du pro- 
gramme. On l'a limité à huit 
caractères maxi, sans espaces ni 
point ; nous sommes alors 
compatibles cassettes et disquet- 
tes. 


19 ’MACHPOKE :POKEUR DE PROGRAMME EN LAN 
GAGE MACHINE 
* AMSTRAD CPC / Michel Archambault 19 


OPENQUT "BIDON":MEMORY HIMEM-1:CLOSED 


MODE 1:CLS: BORDER 9 
PEN 3S:LOCATE 9,4:PRINT 
GRAMMES EN" 
78 LOCATE 11,6: PRINT 
“ 


“POKAGE DE PRO 
"EN LANGAGE MACHINE 


80 PEN 2:LOCATE 8,9:PRINT 

bault — 1985" 

108 PEN 2:LOCATE 2,20:PRINT "Si en HEXAD 

ECIMAL faites preceder de &":LOCATE 10,2 

2:PRINT “puis QUATRE caracteres." 

11Q PEN 1:LOCATE 8,15:INPUT “ADRESSE DEP 

ART : ",AD$ 

120 IF LEFT$(AD$,1)="&" THEN AD=VAL ("&"+ 

RIGHT$ (ADS ,2) ) +256#VAL (LEFT$(AD$,3)):1F 

LEN(AD$)<>5 THEN AD=0:G0OTO 110 

130 IF AD=0 THEN AD=VAL (AD$) 

1000 * ECRAN DE SAISIE 

101@ WINDOW #Q,1,22,6,25:CLS:WINDOW #1,1 
5225142PAPER #1,1:PEN #1,0:CLS #1 

1020 LOCATE #1,5,2:PRINT #1, "ADRESSE" ;SP 

C (4) ; "VALEUR" 

1030 LOCATE #1,3,3:PRINT #1,"deci 
);"hexa" 

1949 WINDOW #2,25,40,1,18: PAPER #2,2:PEN 
#2,@:CLS #2 

1050 LOCATE #2,2,2:PRINT #2," ADRESSE DE 

PART: "* 

1068 LOCATE #2,3,3:PRINT #2,USING "##### 
"sAD;: PRINT #2, SPC (3); "8%"; HEX$ (AD) 

1070 PRINT #2, STRINGS (18,"_"):PEN#2,3:PR 
INT #2," Valeurs POKEES" : PEN#2,0: PRINT 
#2 

1080 PRINT #2," G = Quitter." 

1090 PRINT #2," E = Erreur." 

1100 PRINT #2," V = Vision." 


“Michel Archam 


"3 SPC (4 
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111G PRINT #2," I = 
112Q PRINT #2," L = 
1130 PRINT #2," S = 
1140 PRINT #2," C = 
1150 OPT$="GEVILSC" 
1160 PRINT #2,STRING$(18,"_") 

1170 WINDOW x3, 25,40,18,40: PAPER #S,2:PE 
N #3,3:CLS #5 

2006 ‘ SAISIE 

2010 A=AD 

2020 PRINT USING "ss0n80" 0) :PRINT SPC(4 
); RIGHTS ("Q@G"+HEXS$ (A) ,4) ; SPC(S); 

2025 IF FLOAD THEN LOCATE #35,2,2:PRINT#S . 
"Passez en Vision” 

2030 K=0: INPUT "",V$:1F V#="" THEN 2090 
2055 IF LEN (VS) >2 THEN PRINT CHR$(7) : GOT 
O0 2020 

2046 IF LEN(V#)=1 THEN K=INSTR(OPTS$,V#): 
IF K=@ THEN PRINT CHR$(7):G60T0 2020 

2050 IF K THEN ON K GOTO 3000,4000,5000, 
6000,7000,8000,9000 

2068 1F LEFTS (VS, 12>"F" OR RIGHT$(V$,1) > 
“"F" THEN PRINT CHRS (7) : GOTO 2020 

2078 V=VAL("&"+V#) 

2084 POKE A,V 

20970 A=A+1 : GOTO 2020 

30008 ‘QUITTER 

35010 CLS #3S:LOCATE #3,2,3: INPUT #3,"ON A 
RRÈTE (O/N) ",Q$ 

35020 IF Q$="O" THEN MODE 1:BORDER 1:CLS: 
END 
3050 IF G$="N" THEN 3050 

35040 PRINT CHR$(7);:G0OT0 3010 

3050 CLS #3:G60T0 2020 

4088 ‘ ERREUR 

4010 CLS #3:LOCATE #35,6,2:PRINT #3,"ERRE 
ÜUR:” 

4020 LOCATE #3,3,4:PRINT #53,"Adresse DEC 
1.” 

4030 LOCATE #3,3,6:INPUT #5,"",AE$:AE=VA 
L(AE$):1F AE<AD THEN PRINT CHR$(7);:GOT0 


Impression." 


4090 
4048 PRINT USING "#H#####"3; AE; : PRINT SPC{ 
4) : RIGHTS ("QOBD"+HEXS (AE) ,4) ; SPC(S); 
4050 INPUT "“",V#:1F LEN(V$#)<>2 THEN PRIN 
T CHR$(7); :GO0TO 4040 
4060 IF LEFT$S(V$,1)2>"F" OR RIGHT$#(VS,1) > 
NF" THEN PRINT CHR$(7);:GOTO 4040 
4070 V=VAL("R"+VS) 
4080 POKE AE, V 
4090 1F FVIS THEN FVIS=0:60T0 5000 
4100 CLS #3:G0T0 2029 
5000 ‘VISION 
5010 CLS#3:LOCATE #3,5,2: INPUT #3,"VISIO 
N ?(O/N) ",OQ$:1F G$="N" THEN 5140 
S020 IF Q$<>"0" THEN 5010 
5050 CLS#3:LOCATE #5,2,2:PRINT #3,"Adres 
se DEPART" 
5040 LOCATE #3,2,4: INPUT #53,"en DECI:",A 
V$#: AV=VAL (AVS) 
5050 IF AV<AD THEN PRINT CHR$(7) ; : GOTO 5 
uea 
5060 CLS#3:CLS:FOR I=AV TO AV+19 
5070 PRINT USING "###h###"; I; : PRINT SPC(4 
) 3 RIGHTS ("GGD"+HEX$ (1) ,4) ; SPC(S) ; RIGHTS ( 
NQ"+HEXS$ (PEEK (1) ),2) : NEXT:AV=AV+20 
S080 CLS#S:LOCATE #5,2,2:PRINT #3,"Suite 
sErreur,Fin" 
5085 IF FLOAD THEN PEN #3,G:LOCATE #5,2, 
6:PRINT #3,"Notez l'adresse":PRINT #5," 
finale en DECI !":PEN #S,3 

LOCATE #3,5,4:INPUT#HS,"( S/E/F ) ", 


IF 0Q$="S" THEN 5060 

IF Q$="F" THEN 5140 

IF Q$="E" THEN FVIS=1:G0TO 4000 

PRINT CHR$(7);:GOT0 5080 

IF FLOAD=0 THEN 5200 

CLS#3:LOCATE #5,2,2:PRINT #S,"Adres 
se finale” 


5160 LOCATE #3,2,4:INPUT #3,"en DECI:",A 


F$:AF=VAL(AF#):1F AF<AD THEN 5150 
5170 A=AF+1:FLOAD=0 
5202 CLS#3:CLS:GOTO 2220 
6008 ‘ IMPRESSION 
6010 CLS #3:LOCATE #3,2,3:PRINT #3,"IMPR 
ESSION:" 
6820 INPUT #3," 
THEN 6070 
6030 IF Q$<>"O" THEN PRINT CHR$# (7) ; :GOTO 
4000 
6040 PRINT #8,CHR$ (27) ; CHR$ (64): FOR 1=AD 
TO A-1 
6050 PRINT #8,USING "###H4##"5; I: : PRINT #8 
5" © "3RIGHTS("DOQ"+HEXS (I) ,4);" — ">RIG 
HT$ ("O"+HEXS (PEEK(1)) ,2) 
6060 NEXT 
6070 CLS#3:GOTO 2020 
7000 ‘LOAD 
7810 CLS#3:LOCATE #3,2,2: INPUT #3,"LOAD 
{ O/N )",0$ 
7020 IF G$="N" THEN 7120 
7030 IF Q$<>"O" THEN 7000 
7040 LOCATE #3,2,4: INPUT #3,"NOM:" ,FICHS 
7050 IF FICH$="" THEN PRINT CHRS (7) ; : GOT 
0 7040 
7060 FICH$=LEFTS (FICH$,8) 
7870 LOAD FICH$,AD:FLOAD=1 
7120 CLS#3:GOTO 2020 
8008 ‘SAVE 


{ O/N ) ",G$:1F GQ$="N" 


8010 CLS#3:LOCATE #35,2,2: INPUT #3,"SAVE 
{ O/N ) ",0$ 

8020 IF G$="N" THEN 68090 

8050 IF Q$<>"O0" THEN 69000 

8035 IF FLOAD THEN 8100 

8048 LOCATE #3,2,4:INPUT #3,"NOM:",FICHS 
8050 IF FICH$="" THEN PRINT CHR$ (7) ; : GOT 
0 689248 

8060 FICH$=LEFTS$(FICH$,8) 

807@ LG=A-AD 

8080 SAVE FICH$,B,AD,LG 

8090 CLS#3:G60T0 2020 

8108 CLS#3:LOCATE #5,2,2:PRINT #3,"Adres 
se finale" 

B11@ LOCATE #3,2,4: INPUT #35,"en DECI:",A 
F$:AF=VAL(AFS#S):1F AF<AD THEN 8119 

8120 A=AF+1:FLOAD=0 

8130 CLS#3:GO0T0 8040 

9000 ‘ESSAI DE CALL 

9018 CLS #S:LOCATE #5,2,4: INPUT #3,"ESSA 
I CALL (O/N) ",0$ 

9020 IF G$="N" THEN 9050 

9030 1F QG$<>"O" THEN PRINT CHR$#(7) ; : GOTO 
90080 

9040 CALL AD 

9050 CLS#3:G60TO 2020 

9060 ‘’--- FIN DE LISTING --- 


Modifications de MACHPOKE -—-> MACHDIM 


10 “MACHDIM : CHARGEUR DE PR 

NGAGE MACHINE EN DIM FERA ES 
40 DEFINT J,K,V:DIM P(3000) :V{35000) 

90 MODE 1: CLS: BORDER 16 

60 PEN S:LOCATE 6,4:PRINT "MISE EN DIM D 
E PROGRAMMES EN" 

1070 PRINT #2 :STRINGS (18,"_"):PEN#2, 3:PR 
INT #2," Valairé en DIM":PEN#2, G: PRINT 


#2 

2018 A=AD:J=1 

2080 P(J)=A:V(J)=V 

2090 A=A+1:J=J+1: GO0OTO 2020 
4080 JE=AE-AD+1:V(JE)=V 

9060 CLS#3:CLS:FOR I=AV TO AV+19:K=1-AD+ 
1 

5070 PRINT USING "###H###";P(K)3;2:PRINT SP 
C(4) ;RIGHT$ ("Q@0"+HEX$ (P (K)) ,4) ; SPC(S);R 
IGHT$ ("Q"+HEXS (V (K)) ,2) : NEXT: AV=AV+20 
5140 CLS#3S:CLS:GOTO 2020 

6840 PRINT #8,CHR$ (27) ; CHR$ (64): FOR 1=1 

TO J-1 

60508 PRINT #98,USING "######"3P CI) 3: PRINT 
#9," : " ; RIGHTS ("@OQ"+HEXS (P (1) ) 05" - 
"3RIGHT$S("O"+HEXS$ (V(I)),2) 

7078 J=0:OPENIN FICH$ 

7080 J=J+1:1F EOF THEN 7100 

7890 INPUT #9,P(J),V(J):GO0TO 7089 

7108 CLOSEIN 

7119 A=P(J-1)+1 

8070 OPENOUT FICH$ 

8080 FOR 1I=1 TO J-1:WRITE#9Y,P (1) ,V{I):NE 
XT: CLOSEOUT 

9049 FOR 1=1 TO J-1:POKE P(1),V(I):NEXT: 

CALL AD 


EFFACER dans MACHPOKE les Lignes : 
5085,5150 a 5200,8035,8100 a 8150 
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64 


Den 0 bb bi 5 a ma à à à 


ADRESSE 
eci | } 


VALEUR 


à 


1137 AGBL 1E 
1138 AGBE 7E 
1139 AGB 3 FC & = 
1146 AGEBA 4D E = 
L141 AGBS CD JU = 
1142 AGB6G EL 5 te 
1143 AGB 7 Ag L = 
1144 AGB8 59 S = 
1145 AGBS 59 CG }= 
1146 AGBA en 
1147 AGBB 903 
1148 AGBC Ag 
1149 AGBD 19 
1150 AOBE ee 
1151 AUBFE @D 
1152 aëco Ag 
11S3 agcCi ED 
1154 agce 5SB 
1155 AëacÇ 3 9B 
1156 AgëgcCaAa C 


LEGENDE DES VARIABLES: 


ADRESSE EN COURS 
AD , AD# ADRESSE DEPART 
AE , AE$ ADRESSE DE L'ERREUR 
AF , AF$ ADRESSE FINALE 
AV , AV# : ADRESSE DEPART VISION 
CHR# (27) ; CHR$#(64) : VIDE LE BUFFER IMPRIMANTE 
CHR$ (7) : BIP SONORE 
DIM P(53Q00) : LISTE DES ADRESSES 
DIM V(S008) : LISTE DES VALEURS V 
FICH$. : NOM DU FICHIER 
FLOAD : FLAG DE LOAD 
FVIS : FLAG DE VISION 
1,J,K : INDICES DE COMFTAGES 
JE : INDICE DE L'ERREUR 
LG : LONGUEUR DU FICHIER 
Q$ : REPFONSE A UNE QUESTION 
— V , V$ : VALEUR DU CODE MACHINE 


10 ‘’POKEDIM:POKAGE D'UN FICHIER ASCII CREE PAR MAC 
HDIM 
‘AMSTRAD CPC / M.Archambault 1985 
OPENOUT “"BIDON":MEMORY HIMEM-1:CLOSEOUT 
CLS: INPUT"NOM DU FICHIER: ",FICH# 
OPENIN FICH$:J=0 
J=J+1:1F EOF THEN 90 
INPUT#9,A4,V:1F J=1 THEN AD=A 
POKE A,V:G60T0 60 
CLOSEIN 
100 L=J-1 


110 PRINT "NOTEZ pour ";FICH#$;" :" 


120 PRINT " Adresse DEPART=";AD 

150 PRINT " Longueur=";L 

149 PRINT: INPUT " SAVE en BINAIRE ? (O/N) ”,0$:0$- 
UPFERS (D$) 

15Q IF OQ+="0" THEN 170 

160 IF Q+<>"N" THEN 14@ ELSE END 

17Q PRINT: INFUT"NOM DU FICHIER(ou ENTER) : " ,NOM# 
180 IF NOM$="" THEN NOM$=FICH# 

199 SAVE NOM$,B,AD,L:END 

‘208 ‘---FIN DU LISTING 


QUELQUES 
CONSEILS DIVERS 


— Ne faites jamais un CALL 
avant d’avoir fait un SAVE (pru- 
dence... ). 

— Vous pouvez faire un SAVE 
sur un programme incomplet, 
vous le rechargerez ensuite par 
LOAD pour le terminer et le cor- 
riger éventuellement. 

— Avec MACHDIM et POKEDIM, 
ne donnez pas le même nom aux 
versions ASCII et binaire. 

— Si un imprévu (par moi) vous 
obligerait à faire un BREAK par la 
touche ESC, rien n'est perdu, 
repartez par GOTO 2020. 

— Les pages listings de CPC n° 
1, pages 26 et 27, s'adressent au 
CPC 464 en cassette. Si vous 
avez le lecteur de disquettes 
branché, il faut faire BREAK (ou 
option Q = Quitter), puis ITAPE 
avant de faire CALL &9800, 
sinon vous avez le message ‘Bad 
command”. 

— Lisez attentivement le texte de 
l'article accompagnant le lisitng, 
et ce pour deux raisons : 

- il peut y avoir un MEMORY à 
entrer avant de faire LOAD ‘’nom 
du fichier binaire’, 

- le CALL peut concerner une 
autre adresse que l'adresse 
départ, c'est ce qu'on appelle 
l'adresse d'exécution ou de lan- 
cement (peu fréquent). 

— Pour enregistrer le fichier 
binaire nommé ‘‘TRÜC'’, la 
syntaxe est : 
SAVE'"TRUC”’‘,B,adresse départ, 
longueur 

Les programmes MACHPOKE et 
POKEDIM se chargent de cette 
écriture. En revanche, LOAD est 
bien plus simple ; à partir de l’al- 
lumage de l'AMSTRAD, tapez 
simplement LOAD'‘TRUC”"’, et il 
ira se loger au bon endroit, puis 
CALL adresse. C'est pour cela 
qu'il fallait le noter par écrit. 

— En cas de discontinuité dans 
les adresses (rare), tapez ENTER 
en saisie. 


CONCLUSION 


Avec de tels outils et ces quel- 
ques notions, vous devez (enfin) 
profiter des listings en Assem- 
bleur ; même sans le pratiquer, ni 
le comprendre, il ne vous impres- 
sionnera plus. 


La place réservée aux petites annonces est 
limitée. En conséquence, celles-ci passent 
dans leur ordre d'arrivée. Par contre, les peti- 
tes annonces farfelues sont systématique- 
ment rejetées. De même, comme il est peu 
probable qu'il existe des ‘’généreux dona- 
teurs'’ de matériels ou de logiciels, les peti- 
tes annonces faisant appel à ces philantro- 
pes ne seront insérées que si la place libre 
le permet. 

En conséquence, réfléchissez bien avant 
d'envoyer vos textes. 

Les petites annonces doivent impérativement 
nous parvenir sur la grille (découpée ou pho- 
tocopiée), le texte étant rédigé à raison d'un 
caractère par Case. 

Enfin, toute annonce non accompagnée de 
timbres ne sera pas insérée. 


Vends pour AMSTRAD CPC 464 nombreux 
logiciels (Sorcery, Combat lynx, Defend or 
Die, etc.) de 10 à 20 F. Ecrire à Jean- 
Christophe BLANC, Résidence de Jaume, 
Lons en Vercors. 


Vends AMSTRAD CPC 464 moniteur 
monochrome vert + assem- 
bleur/désass./monituer + Décathlon + Har- 
rier Attack + Snooker + 3D-Invaders + (10 
programmes sur cassette) + joystick : 2900 
F. Olivier DUPUIS, 4 rue Robespierre, 78390 
BOIS D'ARCY, tél.: 045.25.19. 


Suite à déménagement j'ai perdu les notices 
de certains de mes logiciels de jeux AMS- 
TRAD. Pouvez-vous m'envoyer des photoco- 
pies contre remboursement des frais de Sor- 
cery, Fighter-Plot, Battle for Midway, Knight- 
Core. M. SELLA, 18 rue de la Platrière, 
95220 HERBLAY. 


‘Cherche pour 664 (ou 464) programmes et 
interfaces our décodage MORSE-RTTY. 
Autres applications radio en réception bien- 
venues ainsi qu'échanges programmes jeux 
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et utilitaires, astuces, contacts, listings, etc. 
J. PARSI, 28 rue TAine, 75012 PARIS, tél.: 
341.03.37 après 20 h ou 774.20.55 HB. 


Amstradiste échange tous logiciels + cher- 
che TOUTES notices de jeux complètes et 
lisibles (originaux prêtés retournés + photo- 
copies). C. PASQUIER, 29 rue Maxime Gorki, 
78500 SARTROUVILLE. 


Cherche contact hard et soft. Possède plus 
de 200 titres. J'ai déjà réalisé quelques car- 
tes d'extensions. A. ELBAZ, Petite Rue de 
l'Eglise, 67000 STRASBOURG, tél.; (88) 
23.15.77. 


Cherche possesseur d’Amstrad pour échange 
de logiciels. Jérôme TYRANT, La Corderie, 
22200 POMMERIT LE VICOMTE. 


Vends moniteur vidéo N et B 37 cm : 350 
F. Recherche programmes pour ORIC- 
ATMOS. Robert SENECHAL, 30 rue Coutel- 
lier, 60600 CLERMONT OISE, tél.: (4) 
450.05.42. - 


AMSTRAD CPC 464 possédant bons logi- 
ciels d'arcade, d'aventure, etc. échange pro- 
grammes avec autres Amstradistes. Fabrice 
BERGEAT, L'allée de Corse, 91300 MASSY, 
tél.: (6) 920.53.66. 


Amstrad CPC 464 vend 150 logiciels sur K7 
de 30 F à 70 F {le logiciel). Offre uniquement 
sur Paris et banlieue. Philippe LEFEUVRE, 21 
rue du Pont Blanc, 93300 Aubervilliers, tél.: 
352.40.11. Vite, c'est urgent ! (possibilité 
échanges). 


Cherche contacts sur toute la France pour 
échanges de logiciels, trucs et astuces. Cher- 
che également imprimante pouvant se bran- 
cher sur le CPC 464. M. JANVIER, 3 rue Gau- 
guin, 36000 CHATEAUROUX, tél.: (54) 
34.77.89. 
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ANNONCEZ-VOUS ! 


les petites annonces et les messages 


Coupon à renvoyer accompagné de 3 timbres à 2,20 F à : 
SORACOM, 10 Avenue du Général de Gaulle, 35170 BRUZ 


Run Done nt te nn ra ii nn Ce 


E/RRTTY 45 à 110 bds sur CPC 464 et 664 
K7 : 120 F. Eddy DUTERTRE, 6, résid. La 
Pépinière, 92350 LE PLESSIS ROBINSON. 


” Vends console vidéo Philips G.7400 état neuf 


+ extension Basic + 12 cassettes de jeux : 
2500 F. Tél.: (88) 01.72.68. 


Chaîne utilisateurs 464 cherche contacts 
pour échanger tous programmes (en possé- 
dons 80 environ). Christian JULLIEN, 3 rue 
Maurice THOREZ, 63100 CLERMONT FER- 
RAND. 


Vends imprimante CGP 115 40/80 colonnes, 
série et parallèle, 4 couleurs, tbe : 1600 F. 
Echange logiciels (+ de 100) pour CPC sur 
disc ou K7. Cherche notices Devpac, 
Myrddin, Pascal. E. DAURIS, 21 rue de 
l'Aqueduc, 30000 NIMES, tél.: (66) 
29.54.10. 


Amstrad CPC 464 échange logiciels jeux, uti- 
litaires, etc. Thierry AUDIN, 42 rue Bréguet, 
75011 PARIS. 


Vends ou échange programmes de jeux, uti- 
litaires, langages (plus de 120 titres) pour 
Amstrad 464. Jean-Pierre PASCALIN, Colon- 
zelle, 26230 GRIGNAN. 


Vends cause double emploi logiciel cassette 
Battle for Midway avec notice en français. 
A. GUILLOTEAU, 91 rue Villiers de l'Isle 
Adam, 75020 PARIS. 


Cassette jeu Amsoft : Les Bijoux de Stradus. 
Pouvez-vous m'aider à passer l'épreuve du 
garde (envoie 1 listing de jeu en échange). 
J.N. REGIS, 17 rue du Chenêt, 25230 
DASLE, tél.: (81) 34.45.05. 


Cherche correspondant 464-664 pour échan- 
ger 200 programmes, astuces et utilitaires. 
Ecrire à Robert CROC, 4 impasse Riquet, 
31700 BLAGNAC. 


DD DD œœs œ  e 
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Echange programmes Amstrad, vends 200 
programmes pour 500 F. Achète imprimante 
de qualité. Tél.: (49) 68.10.69 le soir. 


AMSTRAD 664 échange nombreux program- 
mes sur disque ou cassette. Recherche nou- 
veautés, trucs et astuces, etc. Michel 
POTIER, 42 rue Voltaire, 94190 VILLE- 
NEUVE ST. GEORGES, tél.: 389.62.44. 


Echange K7 jeux, initiation Basic ou envoi 
contre remboursement 50 F les 5 avec 
notice. M. MORA, BP 7, 41410 NOE. 


Cherche possesseurs d'AMSTRAD CPC 464 
pour ventes ou échanges de logiciels (jeux, 
utilitaires, etc.). Envoyer liste pour échanges 
à M. Fabrice MOLINIER, 6 rue Charcot, 
62290 MOEUX LES MINES. 


Echange nombreux programmes pour CPC 
464, réponse assurée. Contacter Christophe 
VALLA, 30 allée des Brasilias, 26500 
BOURG LES VALENCES. 


Vends ordinateur TI 99 4/A Péritel avec joy- 
sticks, câble mgn, Basic étendu, fixt 32 k, 
minimém. + modules, Foot, Echecs, Vidéo- 
games 1, Adventure (avec 3 K7) + K7. Heb- 
dogiciel n° 1 à 4, Lunau Lauder 2, Solar 
system, Lunau Jumper + 15 programmes + 
7 revues et livres + 35 numéros d'Hebdogji- 
ciel. Le tout : 4500 F. M. LANCELOT, 3 rue 
des Juifs, 18000 BOURGES, tél.: (48) 
24.03.50 après 20 h. 


Vends pour ZX81,. cause acquisition autre 
matériel, assembleur + désassembleur + 
doc. Microconcept (500 F). Nombreux livres 
sur ZX81 à moitié prix. Tél.: (1) 772.92.18 
(381) HB. 


Possesseur d'un CPC 464 cherche corres- 
pondant pour éthanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Bouin, 95600 EAUBONNE. Réponse assurée. 


Vends AMSTRAD CPC 464 vert avec joys- 
tick et plus de 80 logiciels : 3200 F. M. Jean- 
Marc LELOUP, tél.: 384.45.24 où HB au 
233.38.50 ou 233.38.52. : 


AMSTRAD 664 vend ou échange un grand 
nombre de logiciels professionnels et de 
jeux ; peut transposer vos logiciels sur dis- 


quette gracieusement. Tél.: (40) 97.28.64. . 


Cherche des jeux AMSTRAD. Serais prèt à 
faire des échanges. En possède une bonne 
trentaine et aimerais n'étendre. Pour cela 
ecrire à Franck DELHOMME, 6, bd. Nessel, 
67500 HAGUENAU. Réponse assez urgente. 


Pour CPC 464, contre contribution forfaitaire, 
cherche un programme utilitaire pour une 
gestion spécifique administrative avec gra- 
phiques. Appelez, pour précisions et cahier 
des charges M. PERRET, tél.: (84) 
30.03.55. 


Vends carte APPLE Ile entièrement équipée 
(y compris ROM) testée, clavier, alim. à 
découpage, carte langage nue, le tout : 
3200 F ou séparément. Tél.: M. NOEL (1) 
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339.40.55 poste 413 ou 899.26.51 après 
18h 30. 


Possesseur d’un CPC 464 cherche corres- 
pondant pour échanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Bouin, 95600 EAUBONN. Réponse assurée. 


Echange ou achète programmes pour CPC 
464. Cherche utilitaires intéressants, trucs, 
astuces, bidouilles. Marc FICHEUX, Enval, 
653270 VIC LE COMTE, tél.: (73) 69.17.74. 


Vends listings jeux, K7 jeux pour AMSTRAD 
464. H. BONNIN, Les Erondes, Route des 
Sables, 85300 CHALLANS, tél.: (51) 
68.03.58. 


Cherche pour CPC échange de logiciels 
(+200). Envoyer vos listes et propositions 
à M. Michel ROBIN, 51 rue André Marteau, 
37700 ST. PIERRE DES CORPS, tél.: (47) 
44.59.60. 


Echange, achète programmes AMSTRAD 
CPC 464, cherche notice en français Battle 
for Midway. J.P. WOJACZEK, 10 allée des 
peupliers, 78390 BOIS D'ARCY. 


Vends 12 logiciels jeux neufs cause version 
anglaise pour AMSTRAD. Enveloppe timbrée 
pour liste. Echange manuel AMSTRAD ver- 
sion anglaise contre version française CPC 
464. Sébastien GAROUCHE, 27 rue Frédé- 
ric MISTRAL, 30300 FOURQUES, tél.: (90) 
93.21.74. 


Laurent cherche contacts Amstradiens pour 
échanges divers et logiciels : j'en ai pas mal. 
Laurent LOQUET, 64 rue du 8 Mai, Douvrin, 
62138 HAISNES, tél.: (21) 79.82.34. 


Cher. pour 664, achète, échange : jeux, uti- 
litaires + notices. P. GIORGI, 16 av. de Bou- 
vines, 75011 PARIS, tél.: 373.86.50 après 
20 h 45. 


Vends imprimante table traçante pour 
CANON X07, 4 couleurs, CANON X710. bon 
état, sous garantie. Faire offre à M. REVEIL- 
LAS, 10 rue Louis Blanc, 24000 PERI- 
GUEUX. : 


Vends ou échange nombreux logiciels AMS- 
TRAD 664 ou 464 contre logiciels, bidouil- 
les, utilitaires. M. COTTINEAU, tél.: (40) 
97.23.19. 


Echange logiciels pour AMSTRAD CPC 464 
(K7 et disques). Hervé DELARUE, 26 rue du 
Moulin à Vent, Le Val. St. Père, 50300 
AVRANCHES. 


AMSTRAD CPC 6128 cherche Pascal ISO, 
VC5D, TURBO. C. MOREL, 38 rue de Ker- 
menguy, 29200 BREST, tél.: (98) 47.47.74. 


Echange plus de 80 logiciels sur (cassettes) 
CPC 464 : aventure, utilitaire, jeux... Envoyez 
vite vos listes. Réponses assurées dans les 
plus. bref délais. Laurent GHIO, 25 bis rue 
Noirmoutier, 94450 Limeil-Brévannes, Tél.: 
569.29.46. 


Vends cassettes utilitaires à 100 F l’une Tas- 
copy, Easy-Amscalc, Amlettre à 60 F. Cas- 
settes de jeux à 50 F l’une. Flight Pot 737, 
Le millionnaire, Roland in Time, Oh Mummy, 
Hunchback, Tennis. Tél.: (45) 92.86.14 
après 20h. 


Vends ou échange programmes pour CPC 
464. Cherche bon utilitaire ainsi que jeux. 
S'adresser à Ahmed AMRANE, 92 rue Fran- 
çois Couperin la Gd. Mare, 76000 ROUEN. 


AMSTARD cherche programmes sur disquet- 
tes de toutes sortes et en particulier ‘Star 
Watcher’’. Envoyez-moi vos listes. Tony 
POURCHIER, 63, av. E. Allard, 13011 MAR- 
SEILLE. 


Possesseur d'un CPC 464 cherche corres- 
pondant pour échanges sérieux de program- 
mes, trucs et astuces. Envoyer vos listes 
d'échanges à Michel TELLIER, 6 rue Jean 
Bouin, 95600 EAUBONN. Réponse assurée. 


Echange ou achète programmes pour CPC 
464. Cherche utilitaires intéressants, trucs, 
astuces, bidouilles. Marc FICHEUX, Enval, 
653270 VIC LE COMTE, tél.: (73) 69.17.74. 


Vends listings jeux, K7 jeux pour AMSTRAD 
464. H. BONNIN, Les Erondes, Route des 
Sables, 85300 CHALLANS, tél.: (51) 
68.03.58. 


Cause double emploi vends imprimante AMS- 
TRAD DMP-1 état neuf, sous garantie 1 an 
— 20 %. Patrick COMBRISSON, Rue Imbart 
de la Tour, 58000 NEVERS, tél.: (86) 
57.35.31, poste 340 (HB). 


Vends clavier AMSTRAD CPC 464 + 30 
logiciels + doc. : 1500 F. Régis DARNAULT, 
8 rue dé la Croix Ferrée, 78200 MANTES LA 
JOLIE, tél.: 094.14.53. 


Vends AMSTRAD CPC 464 monochrome + 
bte à cass. + 20 log. (Multi-gestion, Ams- 
lettres, Dao, jeux) : 2700 F. Philippe BOUR- 
DAIS, tél.: (43) 28.24.12. 


AMSTRAD CPC 464 : logiciel moniteur simu- 
lateur DX CW : étude progressive et entrai- 
nement code morse, toutes vitesses, tous 
symboles, avec superposition de souffle, 
interférences, brouillages par autre CW, 
fading, etc. Simulant une réception DX. 13 
paramètres à introduire permettant toutes 
configurations. Textes en clair ou codes aléa- 
toires. Tableaux de corrigés en calculateur : 
125F. PICAULT, 13450 GRANS, Tél.: (90) 
55.91.65. 


Vends AMSTRAD CPC 464 monochrome + 


- 50 logiciels (acheté le 05.01.85) : 1800 F. 


Eric BIF, 3, av. Fernand Léger, 91390 MOR- 
SANG s/Orge, tél.: 904.33.71. 


Vends cause double emploi imprimante 
P2000 Sanco ave câble neuve : 4500 F. P. 
DEROCH, 35 rue de Varsovie, 62640 MON- 
TIGNY EN GOHELLE. 


la nouvelle super.production Cobra Soft 


MEURTRES SUR L ATLANTIQUE 


Après Le succès extraondinaire de "MEURTRE A GRANDE VITESSE", 
Logiciel qui a étonné et séduit L'ensemble de La presse spé- 
cialisée par sa qualité et son originalité, COBRA SOFT va 
encore plus Loin et vous inez d'étonnement en étonnement avec 
Le nouveau Logiciel écrit par Bertrand BROCARD : 


MEURTRES SUR L'ATLANTIQUE 


1938. Tandis que {a situation politique s'aggrave en Europe, 
au Havre, Le plus grand et Le plus luxueux paquebot du monde 
appareille pour New-York. À son bond, une clientèle fontunée 
et insouciante... et pourtant un dname va 4e jouer pendant 
La traversée. Vous vous {nouvenez ainsi projeté au coeur de 
La plus incroyable histoire d'espionnage. qui permit aux 
alliés de gagner Le seconde guenne mondiale 5 ans plus tand. 


Ce Logiciel est présenté sous La fonme d'un véritable dossien 
toilé contenant 2 cassettes (plusieurs programmes et enregis- 
trements), photos, fac-similé de journal, indices et un as- 
éontiment d'objets divers et mystérieux ! 

Pour Amstrad : cassette 220 F - Disquette 279 F. 
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BON DE COMMANDE - MEURTRES SUR L'ATLANTIQUE - AMSTRAD 


cassette - disquette (rayer la mention inutile) 
{ à l'adresse suivante 
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rue de Léningrad 75008 Paris Tél. :(1)387.27.27+ ERE INFORMATIQUE 


